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LA PRATIQUE DU TRS-80 



Les auteurs de cet ouvrage sont informaticiens 
chez le constructeur frangais d'ordinateurs CII 
HONEYWELL BULL, ou ils exercent leur activite 
depuis une quinzaine d'annees ; ce qui leur a 
permis de suivre les mutations prodigieuses des 
unites centrales d'ordinateurs passant de la taille 
d'une armoire a celle d'un morceau de Sucre. 

Tous deux, ingenieurs d' etudes : 

Pierre Giraud, 36 ans, a aborde 1' inf ormatique 
par le materiel au debut de sa carriere, mais est 
vite venu au logiciel, ou il a participe a 1' etude 
et a la realisation de logiciels de base et 
d' applications temps reels, saisie de donnees, 
langages . 

Alain Pinaud, 34 ans, participe a 1' etude et la 
realisation de systemes speciaux, tant sur le plan 
materiel que logiciel. 



Leur experience des petites machines a fait 
qu'avec 1' apparition sur le marche des petits 
systemes individuels et pour se changer les idees, 
en dehors de leurs activites professionnelles, ils 
pratiquent le TRS-80... ! 
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PRESENTATION 



Vous avez maintenant en mains le premier volume d'une serie 
consacree au TRS-80. Nous avons en effet eprouve le besoin de 
mettre par ecrit une somme d' experiences personnelles et de 
renseignements tires de lectures - Afin de mieux vous faire 
connaitre, ou de vous apprendre a mieux utiliser cette petite 
merveille qu' est le TRS-80, ainsi que de vous faire beneficier de 
"trues" et astuces qui nous ont coute un certain nombre de nuits 
blanches. . . et dont il serait inutile que vous fassiez les frais. 

Cette serie de volumes s ' adresse d une categorie de lecteurs 
dejd inities aux mysteres de I ' informatique individuelle et 
possedant de preference, un TRS-80, bien que le present volume 
fasse lui-meme figure d' initiation. 

Revenons au volume 1 : C est le volume d' introduction de la 
serie. II vous apportera les bases techniques (technologie et 
programmation) permettant d'aborder avec serenite les volumes 
suivants, consacres a une etude plus appro fondie sur le 
fonctionnement du TRS-80 (et de ce qui I' entoure) , son depannage 
eventuel (sa maintenance) , ses ameliorations possibles et son 
exp loi tation. 

Mais, il y a toujours un dilemme lorsque I' on ecrit ce genre de 
livre, il est trop ardu pour certains, pas asses pour d'autres. 
Void notre reponse : (mais nous devons tout d'abord reclamer votre 
clemence) , vous savez, quinze ans de pratique de I ' "Informatic- 
tic", ga use !... ga use !... et il arrive, parfois, par habitude, 
de comprendre facilement des choses difficiles (pour certains) , 
d'expliquer difficilement des choses faciles (pour d'autres) .. . 
Vous voyez, Docteur, ga recommence ! Nous comptons done, amis 
Lecteurs, sur vos critiques et suggestions . 

Nous avons essaye, dons ce volume, d' adopter pour demarche 
d' expliquer chaque terme nouvellement introduit, dans la mesure 
oil eelui-ei ne figure pas forcement dans les ouvrages d' initiation. 
Si ces definitions sont evidentes pour vous, sautez-les , et si cet 
ouvrage ne vous apporte rien de nouveau, ce qui est tres possible, 
il vous fournira une base documentaire d laquelle vous pourrez 
vous referer en cas de besoin, une somme d' informations condensees 
dans un ultime but : dominer Therese... 

Ah oui ! au fait, nous ne vous avons pas prisente : nos epouses, 
n' ay ant pas toujours apprecie nos nuits passees avec le TRS, V ont 
surnomme : Therese ! 
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CHAPITRE 1 

INTRODUCTION 



Le beso-in, ou la necessite d'un ordinateur personnel ? 

Pourguoi ? Pour qui ? Pour realiser l'un des vieux reves de 
l'homme, en voulant donner un semblant de vie et un semblant 
d 1 intelligence a ce qui n'est jamais qu'un "tas de ferraille 
inerte" ? Un besoin imperieux de dominer la machine (mais en lui 
fournissant les armes pour se defendre) ? Un support pour etancher 
sa soif de creation, ses projections ? 

Oh ! nous n'allons pas essayer ici d'inventer des pretextes ou 
des histoires a dormir debout. 

La verite, elle est toute simple : nous faisons partie des 
bienheureux qui ont la chance d'aimer le travail qu'ils font, et 
de 1' aimer avec acharnement, a tel point que, non contents de 
manipuler des ordinateurs toute la journee, ils veulent aussi 
pouvoir continuer chez eux, le soir, une partie des week-ends ou 
de la nuit meme. 

Laissons-la la philosophie ; et puis, pourquoi faudrait-il 
toujours trouver des reponses a tout ! Nous ne sommes pas des 
ordinateurs ! 

Pensez done ! En une seule soiree, vous pouvez quitter New- 
York en voilier, rejoindre San-Francisco par le Cap Horn, contre 
vents et marees, faire un golf de dix-huit trous, battre Therese 
aux echecs, debarrasser la galaxie Tartampion des inf ames monstres 
de l'espace qui menagaient de s ' en emparer, apprendre votre 
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vocabulaire d 1 anglais quotidien, interroger votre fichier de 
comptes, sortir un listing des factures impayees, vous apercevoir 
que votre femme a depense pour 1256,72 francs de chaussures durant 
le dernier trimestre, vous faire battre par Othello, perdre 12500 
dollars au Blackjack (quel tricheur celui- la !), vous faire battre 
de nouveau par Othello, vous transformer en pilote de chasse se 
frayant un chemin au milieu des salves... Bourn !... Boum! . . . (La, 
ce sont les voisins qui frappent au mur...), et tout cela, sans 
le moindre signe de fatigue ou de contrariety (sauf pour les 
chaussures, la, elle y a ete un peu fort !) . 

En attendant la note que l'ordinateur decernera a votre fils, en 
reponse aux multiplications qu'il est en train de lui poser, 
pensez aux autres idees pratiques que vous pourrez developper 
demain sur votre joujou, si vous pouvez toutefois en avoir 1' acces, 
car votre femme qui passe son examen de dactylo dans trois jours, 
voudrait bien avoir la certitude qu'elle "tient" toujours la 
vitesse de 56 mots/minute, soit 585 caracteres en une minute et 
quarante trois secondes, dixit Therese... 

Bien sur ! un micro-ordinateur, on peut s'en passer ! mais c'est 
tellement plus complique avec... Naturellement, il y a des 
applications beaucoup plus serieuses, mais patience. 
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POURQUOI LE TRS-80 ? 

II y aura inevitablement dans ce qui suit un certain nombre de 
termes techniques, mais ne vous y arretez pas trop, ils seront 
expliques en temps utile. Quant aux repetitions, elles sont la 
pour vous aider a mieux memoriser toutes ces choses nouvelles 
pour vous . 

Cinq facteurs principaux ont oriente notre choix vers le TRS-80, 
sans parler du fait qu'a 1 ' epoque de son achat, il n'avait pas 
tous les freres qu'il a maintenant, tout au moins en France, (mais 
cela ne remet toujours pas notre choix en cause) : 

- Son przx : Defiant alors, et encore actuellement, toute 
concurrence, (a partir de 3995 FF en mars 79, tout compris, en 
version level 1, avec un clavier standard permettant la 
dactylographie, un ecran video, un bloc d 1 alimentation et un 
magnetophone) . 

- Son micvopvoaesseur : Z-80, (le cerveau du systeme) , de la 
firme americaine Zilog. En tant que professionnels, nous avons 
bien entendu apprecie ce choix excellent, d'autant que le Z-80 
nous etait deja connu par son cousin, le 8080 de la firme Intel. 
Ce microprocesseur possede les qualites, - vitesse, richesse du 
jeu d' instructions (son vocabulaire) , facilite d'emploi, grande 
souplesse - qui le font retenir dans la majorite des applications 
industrielles sophistiquees a caractere professionnel (par 
opposition aux applications de type "grand public") necessitant 
fiabilite et performance. 

L'interet que nous voyons egalement dans ce microprocesseur reside 
dans la diffusion universelle de son langage (incluant celui du 
8080) , ce qui sous-entend une "bibliotheque" de sous-programmes 
de taille respectable. Par exemple, si vous voulez faire resoudre 
tel ou tel probleme a votre ordinateur, il y a de fortes chances 
pour que ce probleme soit deja traite par un "sous-programme" de 
la bibliotheque des utilisateurs, alors inutile de vous casser la 
tete. 

- Ses possibilites d' extension : Entendons par la : le moyen de 
communiquer facilement avec des appareils exterieurs a 

1' ordinateur . Sur ce plan, le TRS-80 est bien place, puisqu'il 
presente, par le moyen d'une prise arriere, quarante fils ou 
signaux aux utilisations les plus diverses. 

Notons qu'a 1' inverse de certains micro-ordinateurs, qui off rent 
des moyens de communication figes - et done forcement limites - 
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le TRS-80 donne genereusement la quasi-totalite du "Bus" (ou 
canal de communication) du microprocesseur lui-m§me. De ce fait, 
tout ce qui est propre a se raccorder au microprocesseur Z-80 (ou 
autre, ayant une structure de Bus similaire) , pourra se raccorder 
au TRS-80. Voila ce que nous appelons un systeme "ouvert". 

- Les performances de son logiciel ;Le logiciel est le terme 
qui designe 1* ensemble des programmes qui vont donner la "matiere 
grise" indispensable a la machine. 

En parlant ici de performances, nous nous empressons de dire que 

nous pensons en particulier au logiciel "Level 2" du TRS-80 qui, 

moyennant moins de 700 FF supplementaires, pourra etre greffe sur 

la machine de base dont le prix est cite plus haut. 

Mais ce "changement de personnalite" en vaut la peine. Le logiciel 

"Level 1" est, en effet, destine a l'initiation et s'avere, de ce 

fait, tres limite lorsque son but est atteint. On eprouve alors 

rapidement le besoin de passer au stade superieur. 

Le "Level 2", par contre, ecrit par des specialistes du langage 

d' ordinateur , off re une richesse et une souplesse qui feraient 

palir des ordinateurs bien plus puissants. 

Comme pour le materiel, on retrouve ici, dans le logiciel, la 

notion de systeme ouvert -qui permet, avec une grande facilite 

pour l 1 utilisateur, d'agir directement sur les differents organes 

de la machine. 

- Sa logeabilite et son autonomie : Ce dernier facteur peut 
sembler un detail, mais il a, lui aussi, son importance. 

N 1 ayant pas l'audace d'aller jusqu'a transformer notre salle de 
sejour en laboratoire d'etude ou en centre de calcul, (...d'accord 
pour Therese, mais une Therese discrete...), il fallait, bien 
entendu, trouver une machine qui s'integre facilement dans un 
mobilier donne, en I 1 occurence l'un des secretaires d'un meuble- 
living, le clavier du TRS etant fixe sur l'abattant, le video et 
le magnetophone eux, rentrant facilement au fond du secretaire, 
laissant meme la place a de futures extensions. 
Ce P.S.I, (petit systeme individuel) a egalement l'avantage de 
vous permettre une autonomie vis-a-vis du televiseur familial, 
bien appreciable lorsque madame a decide de regarder Paul Newman 
a la tele, ce soir (...d'accord pour Therese, mais pas pour une 
Therese envahissante. . . ) . 

Puisqu'il est question d'ecran, il faut preciser que celui-ci, 
lorsqu'il est bien regie, (ce qui n'est malheureusement pas 
toujours le cas) , offre une grande lisibilite de seize lignes 
nettement separees, de soixante-quatre caracteres chacune, avec 
possibilite, en Level 2, de gros caracteres tres agreables. 
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PETIT LEX I QUE PRELIMINAIRE 

Avant d'aller plus loin dans notre etude, il convient maintenant 
d' examiner quelques termes de base qui seront utilises frequemment 
au cours des chapitres suivants . II n'y a pas forcement de liens 
logiques entre ces termes, aussi n'en cherchez pas... 

Moniteur Video : C'est, en somme, un televiseur, mais prive de 
la partie reception des ondes donnant le son et 1' image, car 
inutilisee dans notre cas . II se compose globalement des sous- 
ensembles suivants : - amplif icateur video, c'est un circuit 
electronique qui amplifie les signaux electriques venant de 
l'exterieur (clavier du TRS-80, par exemple) avant de les diriger 
vers l'ecran ; - des circuits de "balayage" qui permettent de 
deplacer un point lumineux (appele spot) , tres rapidement de 
gauche a droite, et de haut en bas, ce qui donne, grace a la 
persistance retinienne de l'oeil, 1' impression d'une image fixe ; 
- des circuits d' alimentation (voir ce mot plus loin) qui 
fournissent, a partir du secteur, les differentes tensions 
necessaires ; - un tube cathodique (ecran) , qui donne 1 ' image . 

Alimentation : C'est un dispositif permettant de fournir la ou 
les tensions electriques necessaires aux circuits electroniques 
de 1 ' ordinateur . Une pile, par exemple, est une alimentation 
simple. Mais il y a une difficulty ; les circuits annexes au 
microprocesseur utilisent frequemment trois tensions differentes 
(+5V, -5V, +12V) . Le bloc d' alimentation aura done pour rSle de 
fournir, a partir de la tension secteur 220V, les tensions 
necessaires . 

Clavier : Tout le monde a deja vu un clavier de machine a 
ecrire. Le TRS-80 en comporte un egalement, mais sans toute cette 
mecanique ! C'est 1 ' un des organes d' entree qui permet d'envoyer 
des informations au microprocesseur. Chaque touche du clavier 
abrite, en effet, un petit contact qui, lorsqu'il se ferme, 
indique au microprocesseur la touche correspondante qui a ete 
enfoncee. 

Magnetophone .-Tout le monde le connalt aussi, mais a quoi peut- 
il bien servir dans ce cas ? II s'agit, ici, d ' un magnetophone a 
cassettes tout-a-fait ordinaire, mais qui a un autre but que de 
faire de la musique ! Lorsque vous voulez vous souvenir de 
quelquechose, vous l'ecrivez sur un papier ? En relisant ce 
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papier, plus tard, vous vous souvenez alors de ce que vous y aviez 
ecrit . 

L'ordinateur agit de meme avec le magnetophone. Lorsque vous 
voulez qu'il se souvienne d'un jeu, par exemple, vous devez lui 
donner l'ordre d'aller "l'ecrire" sur une cassette. Plus tard, 
apres 1" avoir prive un court instant de sa source d 1 alimentation, 
il faudra lui donner l'ordre de "relire" la cassette, afin qu'il 
se re-souvienne de ce jeu. Le role du magnetophone est done celui 
de support de memorisation. 

Programme : C'est un ensemble d' instructions ou directives 
exploitees par l'ordinateur, pour realiser une tache donnee. A 
chaque tache, que ce soit un jeu, un calcul de paie ou une 
operation quelconque, correspond un programme specif ique a cette 
tache . 

Le programme est place dans la memoire de l'ordinateur ou il est 
execute au fur et a mesure. 

Par opposition a 1 ' ensemble des composants electroniques nomme 
"materiel", le programme (ou 1' ensemble des programmes) est nomme 
"logiciel" (les mots americains correspondants sont "hardware" et 
"software" ) . 

Basic : C'est un langage evolue universel, c'est aussi un 
programme. Mais il n'a pas besoin, dans le cas du TRS-80, d'etre 
charge en memoire, etant donne qu'il est deja dans une memoire 
speciale qui ne s'efface jamais (pratiquement) , et qui est 
operationnelle des la mise sous tension du systeme. 

Sans programme, l'ordinateur est mort . C'est pour cela qu'il doit 
toujours y en avoir un en memoire centrale, si petit soit-il, 
afin de diriger les operations initiales a la mise en marche de 
l'appareil. Ce petit programme est appele "Bootstrap" en 
americain, ce qui signif ie a peu pres "chausse-pied" . Son role 
sera uniquement d' assurer 1' entree en memoire d'un programme 
exterieur plus important qui est, en fait, le programme principal . 
Mais dans le cas du TRS-80, ce dispositif est superflu puisque, 
rappelons-le, la totalite du Basic est toujours presente en 
memoire. 
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CHAPITRE 2 

PRESENTATION GENERALE DU TRS 80 



Le materiel 



En version de base, le TRS-80 se compose globalement de quatre 
"boltes" independantes j 

Un ensemble alavier .- II abrite egalement la carte (circuit 
imprime) micro-ordinateur (microprocesseur, memoires, circuits de 
couplage video et magnetophone) . Cet ensemble est muni de 3 
prises d' entree de type DIN 5 points, d'un interrupteur marche/ 
arret, d'un bouton-poussoir de reinitialisation, d'un voyant de 
mise sous tension et d'un clavier au standard anglo-saxon (QWERTY) 
de 5 3 touches. 

A l'arriere du clavier, on trouve egalement un connecteur 4 
points, permettant la liaison avec d' eventuelles extensions. 
Les trois prises DIN sont utilisees pour raccorder respectivement : 
le bloc alimentation, le moniteur video et le magnetophone. Le 
logiciel de base (Basic 1 ou 2) , ainsi que la memoire RAM (4K ou 
16 K) sont loges dans cet ensemble. 

Le moniteur video : II ressemble a un petit recepteur de 
television portable, et comporte un cordon d' alimentation secteur, 
un interrupteur marche/arrSt, un cordon video se branchant sur 
1' ensemble clavier et deux commandes de reglage de luminosite et 
de contraste. Des commandes plus "techniques" sont accessibles 
a l'arriere de l r appareil. L'ecran video permet l'affichage de 
16 lignes de 64 caracteres alphanumeriques (ou 16 lignes de 32 
caracteres de taille double) ainsi que d'une grille graphique de 
128 fois 48 cellules. 
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Le magnetophone : C'est un magnetophone a cassettes standard, 
mais possedant une telecommande du moteur (commande a distance) , 
une entree ecriture cassette (AUX) et une sortie lecture (EAR) . 
Un cable, termine a 1 ' une de ses extremites par trois prises 

•Jack" permet de relier ces trois fonctions a l 1 ensemble clavier 

(prise DIN 5 points) . 

Bloc alimentation : C'est une petite bolte noire, comportant 
un cordon secteur 220V et un cordon termine par une prise DIN 
s'enfichant sur 1' ensemble clavier. Cette alimentation fournit 
les tensions necessaires au fonctionnement du TRS-80. Attention 
au croisement malencontreux des trois prises DIN du clavier... 
II pourrait se traduire par une legere fumee... (voir les 
reperes a l'arriere du clavier) . 



Un certain nombre d' extensions venant s'ajouter a 1 ' ensemble de 
base sont proposees par le constructeur : 

Extension memoire RAM 16 K octets : Cette memoire occupe 
physiquement la place de la memoire de base de 4 K octets situee 
sous le clavier du TRS-80. Les 8 boitiers memoire 4 K sont 
retires et remplaces par 8 boitiers 16 K. 

Extension du logiciel : Le Basic 1 contenu dans 2 memoires 
ROM de 2 K octets chacune, est remplace par le Basic 2 contenu 
dans 3 memoires ROM de 4 K octets chacune. Pour ce faire un 
circuit imprime annexe contenant ces ROM est ajoute sous le 
clavier et est relie a la carte mere par un cable plat. 

L' expansion interface : Cet ensemble, de dimensions a peu pres 
egales a celles de 1' ensemble clavier, se situe, en principe, 
sous le moniteur video. II est relie au clavier par un cable 
plat. Les possibilities de l 1 expansion interface sont les 
suivantes : 

- extension memoire RAM portee a 48 K octets (32 K dans 
l'expansion et 16 dans le clavier), 

- couplage de 1 a 4 disgues souples (mini-disguette) , 

- couplage d'une imprimante parallele, 

- contrSle d'une horloge, 

- couplage d'un deuxieme magnetophone a cassettes. 

De plus, il est possible d'ajouter dans le chassis une carte 
aux normes RS-232 (V 24 en Europe) , permettant de raccorder 
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un terminal clavier/ecran ou une imprimante serie, ainsi qu'une 
liaison par ligne telephonique . 

Bien entendu, le connecteur de sortie de l 1 ensemble clavier est 
deporte sur 1' expansion interface, afin de pouvoir raccorder 
d'autres extensions. 

Les peripheriques : Le constructeur commercialise : imprimantes 
(deux modeles), disquettes (5 pouces, 89600 octets par disquette) 
modem acoustique et synthetiseur vocal. 

D'autres societes diffusent, souvent a des prix competitifs, des 
extensions RAM 16 K (utilisables aussi dans 1 ' expansion interface) 
les peripheriques standards imprimantes et disquettes, et des 
dispositifs originaux, non commercialises par le constructeur. 
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LE LOGICIEL DE BASE ET LES UTILITAIRES 

Le logiciel de base comprend le ou les programmes qui controlent 
la machine, ceux qui ont la part la plus active a son fonction- 
nement et a son environnement (peripheriques) . Les utilitaires, 
ainsi nommes parce qu'ils realisent un tas de petites choses 
utiles, sont toujours des programmes "exterieurs" contenus sur 
cassettes ou disquettes. 

Le logiciel de base fourni par le constructeur comprend 
1* interpreteur Basic (2 versions, 2 puissances) et le TRSDOS 
(DOS = Disk Operating System) . 



Le Basic, contenu en ROM, est operationnel des la mise sous 
tension de la machine. C'est un programme qui permet au TRS de 
parler un langage du meme nom, et connu aussi d'autres ordinateura 
II a ete choisi pour sa facilite d'emploi, ses possibilites 
variees et son apprentissage facile pour l'homme. 
Comme son nom l'indique, il interprete et execute les programmes 
ecrits en langage Basic. 

Le TRSDOS : Disponible uniquement lorsqu'une disquette est 
raccordee au TRS, est un dictateur qui controle toute la machine. 
Avec lui, meme 1' interpreteur Basic devient esclave, bien que le 
TRSDOS donne a ce dernier une puissance encore plus grande 
qu' auparavant. Tous les programmes sont stockes sur disque, d'ou 
ils sont rappeles en quelques dixiemes de secondes. D'autres 
langages peuvent aussi etre soumis au TRSDOS (FORTRAN, par 
exemple) . 



Les utilitaires fournis par le constructeur sont au nombre de 
deux (sous Basic 1 ou 2) : TBUG et EDTASM. 

TBUG est un petit "moniteur" permettant d'ecrire des programmes 
dans le langage directement assimilable par le microprocesseur 
(hexadecimal) . 

EDTASM est un "editeur assembleur" permettant d'ecrire des 
programmes en langage d' assemblage (tres proche du langage 
machine) . 
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D'autres societes proposent enfin tout un choix de logiciels que 
nous nous contenterons d 1 enumerer , et dont certains seront decrits 
ulterieurement : 

- compilateur FORTRAN sous TRSDOS 

- macro-assembleur sous TRSDOS 

- un autre DOS : CP/M 

- compilateur Basic sous CP/M (CBasic) 

- langage LISP 

- COBOL sous CP/M 

- RSM (moniteur desassembleur) 

- RENUM (utilitaire de renumerotation Basic) 

- DUPLIK (utilitaire de duplication de cassettes) 

- NEWDOS (donne au TRSDOS des f onctionnalites supplementaires 
tout en corrigeant certaines anomalies) . 

- tout recemment : langage PASCAL sous TRSDOS. 
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A QUI S'ADRESSE T-IL ? 

Sans vouloir reprendre une formule connue (de sept a soixante 
dix sept ans) , on peut dire qu'il peut commencer a interesser et 
a etre utile aux enfants de dix a douze ans (surdoues mis a part) . 

Aux Etats-Unis, des spots publicitaires dela TV montrent chacun 
des membres de la famille devant son TRS-80 individuel, exergant 
les activites les plus diverses. Bien entendu, nous n'en sommes 
pas la, mais qui aurait ose parler d'ordinateur individuel, il y 
a seulement cinq ans ? De nos jours, chaque enfant est capable 
d'utiliser un telephone ou une calculette. II y a vingt ans, ses 
parents ou grands-parents le pouvaient-ils ? 

Il y a deux groupes principaux d' utilisateurs : Ceux qui ne 
oonnaissent rien aux ordinateurs et qui ne veulent rien oonnattre 
de -plus. Ceux-la auront uniquement pour tache de fournir a 
l'ordinateur un programme realise par les soins d'un programmeur 
ou d'une societe de service en informatique ; ceux qui oonnaissent 
ou qui ne oonnaissent pas, mais qui veulent en savoir plus, et 
notamment realiser leurs pvopres programmes (ou eventuellement 
modifier des programmes existants) . Nous adressons nos 
felicitations a ceux de ce dernier groupe, car ils ont choisi 
la voie la plus passionnante. Bien sur cette voie necessitera un 
petit effort, mais c'est le premier pas qui coute et il a deja 
ete franchi, puisque vous lisez ce livre. 



Le TRS-80, de par sa conception, s'adapte facilement aux 
domaines d' application suivants : 

- personnel 

. jeux, distractions, hobby 

. telecommandes diverses (train electrique par ex.) 
. gestion (finances familiales) 
. fichier (cuisine, telephone, langues) 
. etudes personnelles (maths, langues, dactylo, 
musique) 

- prof essionnel 

. fichier clients 
. gestion de stocks 
. banque de donnees 
. enseignement 
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- industriel 

. simulation 

. laboratoire 

. pilote d ' automate 

. calcul scientifigue 

. telecommandes industrielles 

. bancs de mise au point 

. mini systeme de developpement logiciel 

La liste ci-dessus n'est pas exhaustive et donnera simplement 
un echantillon des possibilites dont l'eventail s'elargit chague 
jour. En fait, chague sous-domaine d' application se decomposerait 
en de multiples branches. Mais le but recherche ici n'est gue de 
vous donner une petite idee sur les possibilites d' adaptation de 
ce magicien gu'est 1 ' ordinateur . 
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QUELQUES APPLICATIONS REALISEES 

Nous avons choisi de vous presenter deux applications concretes, 
parmi une foule d'autres probablement, et qui ont ete portees a 
notre connaissance par leurs auteurs que nous tenons a remercier 
ici. Les pages qui suivent montrent que le TRS-80 est capable, 
quand il le veut, d'abandonner les jeux pour s ' attaquer a des 
choses plus serieuses . 

Outre ces deux applications, nous aimerions citer au passage 
l 1 utilisation faite du TRS-80 a l'Universite de Vincennes, en ce 
qui concerne 1' etude des langages (la linguistique) et la 
transposition sur TRS-80 du langage LISP (VLISP) , qui est un 
langage d'ordinateur orients vers 1' intelligence artificielle et 
la resolution de problemes a caracteres logiques . Therese sait 
maintenant parler le "LISP" ! 



Le traitement et I'affiohage des resultats des elections 
aantonales . 

Lors des dernieres elections cantonales, un TRS-80 a ete 
utilise par un hebdomadaire regional, "Toutes les nouvelles de 
Versailles". II s'agissait d'une operation aussi bien de stockage 
et de traitement des resultats que de "public address". 
Les resultats arrivant des diffSrentes communes, souvent bureau 
de vote par bureau de vote, etaient collectes par des journalistes 
qui transmettaient immediatement ces chiffres a 1 ' un des leurs, 
specialise dans 1' utilisation d'un ordinateur et, en l'occurence, 
auteur du programme . 

Les chiffres, entres par le clavier, etaient immediatement 
traites par le TRS-80. Les totaux se faisaient sur des tableaux, 
commune par commune et canton par canton. Les pourcentages de 
participation et des voix des candidats etaient aussitot calcules 
et affiches. 

La grande originalite de cette operation a ete de relier le 
TRS-80 a un reseau de television interieur comportant une dizaine 
de postes, certains destines au public venu en grand nombre 
s'enquerir du resultat de cette consultation, d'autres tenant 
informes les journalistes des resultats deja recus . 
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D'autres postes de television, disposes dans des salles de 
reception ou des bureaux, etaient destines a la redaction en chef 
et auxnombreuses personnalites presentes, qui avaient compris que 
ce procede moderne et original leur permettrait d'etre informes, 
minute apres minute, de la physionomie de cette election. 
Sur les ecrans apparaissaient le nom de la commune ou du canton, 
les inscrits, les votants, les suffrages exprimes, le nom de 
chaque candidat ainsi que le nombre de voix qu'il avait obtenu, 
tous les pourcentages arrondis au plus pres, a deux chiffres 
apres la virgule. 

Enfin, l'ordinateur affichait, de lui-meme : soit "resultats 
partiels", soit "ballotage" , ou encore si 1 ' un des candidats se 
trouvait elu, "ELU : M. DUPONT (UDF)", par exemple. 
Precisons egalement que chaque resultat entre pouvait etre 
facilement modifie, corrige ou complete. 

L'ordinateur individuel TRS-80 etait un niveau 2 equipe de 16 K 
octets de RAM. Le programme Basic congu pour cette operation et 
qui permettait egalement le passage d'un graphisme publicitaire 
pour le journal, pouvait s'executer sur seulement 5 K octets de 
memoire. 

Dans l'avenir, 1' utilisation de MODEMS pour la transmission par 
telephone, pourrait permettre les ©changes des resultats avec 
d'autres hebdomadaires regionaux comme "Les Nouvelles de 
Rambouillet" , par exemple. 



Traitement de signal 

Cette application, tres technique, a ete realisee dans le 
domaine de 1' electronique medicale mais, etant donne ses 
debouches, nous l'examinerons sous un angle plus general. 

II s'agit d'extraire un signal noye dans un bruit, en utilisant 
le principe de la detection synchrone. 

- sortie de la courbe obtenue sur l'ecran video, 

- sortie de la courbe sur table tragante, 

- analyse de Fourier 

- sortie du spectre d' amplitude et de phase sur table tragante. 

La premiere etape consiste a definir, de facon simple et 
agreable, les parametres d' acquisition du signal, d'ou un mode 
conversationnel elabore. Citons quelques parametres : 
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- temps d' analyse du signal de 1 a 2000 MS. 

- nombre d' echantillons : de 1 a 2048 

- nombre de passages : de 1 a 65535. 

La deuxieme itape est 1' acquisition proprement dite. 
Le logiciel, ecrit en assembleur et en Basic, utilise les 
parametres ci-dessus et controle les fonctions suivantes : 

- prise de N echantillons (T mini = 64 microsec.) et constitution 
d'un mot de 12 bits venant d'un convertisseur analogique 
numerique (CAN) , et stockage dans une table tampon. 

- cumul avec les echantillons precedents. 

- bouclage 

L'etape suivante consiste a visualiser sur l'ecran la courbe 
obtenue et a la sortir sur une table tracante. 

La carte d' interfagage comprend deux convertisseurs numeriques 
analogiques (CNA) de 12 bits (precision sur 200 mm : 0.05 mm) et 
une commande plume (position haute ou basse) . 

L'etape finale met ensuite en oeuvre un logiciel conversationnel 
permettant de definir les parametres concernant le type de 
traitement a ef fectuer (analyse de Fourier, stockage des courbes 
sur disquettes, etc..) 

Le schema donne une idee de la configuration et des interfaces 
realises pour mener a bien cette application. 
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CHAPITRE 3 

APPROCHES TECHNIQUES 



Dans ce chapitre, nous allons "survoler" rapidement les bases 
materielles et logicielles qui vont nous aider a examiner plus 
a fond l'anatomie du TRS-80. 

Rappelons que ces bases peuvent etre etayees par des ouvrages 
plus generaux consacres a la technologie et a la programmation 
des ordinateurs. 



LE MATERIEL 



Les differents types de circuits, outre les composants 
classiques : resistances, condensateurs, diodes et transistors, 
que nous trouverons sur la carte microprocesseur du TRS-80 
peuvent etre divises ainsi : le microprocesseur, les memoires, 
les operateurs logiques, les circuits fonctionnels (bascules, 
diviseurs, decodeurs etc...). 

Les technologies employees sont de type LS et CMOS qui sont 
caracterisees par leur faible consommation. 



Le Miaropro oesseur 

Comme vous le savez maintenant, c'est un Z 80. II est 
schematiquement represents comme ci-apres * 
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C'est le plus gros circuit de la carte microprocesseur . II 
possede 40 pattes qui lui permettent d'entretenir des rapports 
dictatoriaux avec son entourage . 

Le Bus (ou canal de communication) d'adresses, permet de 
selectionner les adresses memoire necessaires a 1' execution des 
ordres emanant de 1' unite centrale. II sera compose de 16 
signaux. Les adresses peuvent egalement selectionner un organe 
peripherique . 

Le Bus de donnees, de 8 signaux, assure le transport de 
l 1 information entre les differents sous-ensembles relies au 
microprocesseur. Ainsi, lorsqu'un octet est extrait de la memoire 
par une instruction, il chemine sur ce Bus durant une fraction de 
temps, et est dirige vers l'un des registres du Z 80. 
Le Bus de commande (13 signaux) , est utilise pour mettre un peu 
d'ordre dans tout ce remue-menage. . . II indique par exemple le 
sens des informations (entree ou sortie) , le temps pendant lequel 
doit durer telle ou telle operation, 1' organe de destination des 
donnees (memoire ou peripherique), l'arrivee d'une interruption 
prioritaire etc... Maintenant que nous avons vu les pattes, 
voyons un peu a quoi elles sont rattachees . 

Le coeur du microprocesseur est compose d'une unite logique et 
arithmetique (ALU) qui execute les instructions demandees par le 
programme residant en memoire centrale. Pour ce faire, l'ALU 
communique avec un bloc de registres (memoire auxiliaire tres 
rapide) se trouvant dans le micro-processeur et servant 
d' intermediaire entre ce dernier et le programme. 
Ces registres, appeles registres generaux, sont au nombre de 22, 
et sont decrits ci-apres. 
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Enfin, un decodeur d r instructions a pour role de reconnaitre le 
type d' instruction a executer, d'appeler eventuellement en 
memoire centrale les informations qui y sont attachees et de 
sous-traiter son execution a l'ALU. 



Les memoires 

Deux types de memoires sont utilises dans le TRS-80 : memoires 
ROM et RAM. 

Memoire R.O.M. (read only memory). C'est une memoire dite 
"morte" qui, une fois ecrite, conserve ses informations 
indef iniment. Point question d'ecrire a nouveau dans cette 
memoire. Elle ne peut qu'etre lue. Toute tentative d'ecriture 
serait un coup d'epee dans l'eau, et les informations precedemment 
ecrites resurgiraient tou jours a la lecture. 
Ce type de memoire abrite le programme du moniteur et de 
l'interpreteur Basic. C'est lui qui est active a la mise sous 
tension de l'appareil (depart a l'adresse ZERO). 
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Selon les versions logicielles Level I ou Level II, on trouve : 
soit deux boltiers ROM de 2 K octets chacun, soit trois boltiers 
ROM de 4 K octets chacun. 

Signalons que la technologie actuelle permet des densites de 
l'ordre de 64 K bits par boitier (8 K octets) pour ce type de 
memo ire. 

On peut classer egalement dans les memoires ROM, le generateur 
de carateres video. C'est un circuit special qui contient le 
graphisme de tous les caracteres apparaissant sur l'ecran. Avez- 
vous remarque que chaque caractere de l'ecran video est forme 
d'un ensemble de petits points ? C'est le generateur de caracteres 
qui contient les informations permettant de tracer chaque 
caractere sur l'ecran. 



Memoire R.A.M. (Random Access Memory). Elles sont divisees en 
deux types, tous deux utilises dans le TRS-80 : RAM statiques et 
RAM dynamiques. 

Les premieres sont utilisees, dans le cas qui nous preoccupe, 
pour assurer la memorisation des informations de l'ecran video 
(1024 caracteres). Les RAM statiques, de par leur technologie, 
peuvent retenir une information tant que la tension d' alimentation 
reste etablie, et tant qu'on ne vient pas reecrire une nouvelle 
information a la meme place, bien sur. La technologie actuelle 
permet des densites de 4 K bits par boitier. Celles utilisees 
dans le TRS-80 ont une capacite de 1 K bits. 

Les RAM dynamiques , elles, off rent une densite plus importante : 
16 K bits (et bientot 32 et 64... On n'arrete pas le progres !). 
Mais il y a un petit detail : leur pouvoir de retention de 
1' information est limite a quelques milliemes de secondes. C'est 
ce qui s'appelle "avoir la memoire courte" ! Aussi, il faut 
"rafraichir" ces memoires (REFRESH) en lisant puis reecrivant les 
informations qu' elles contiennent, et ceci environ toutes les 2 
ms (2 milliemes de secondes) par cellule memoire. 
Cette tache est heureusement realisee par un dispositif interne 
au Z 80 qui, chaque fois qu'il lit ou ecrit en memoire (ce qui 
ne manque pas de se produire) , rafraichit par la meme occasion 
les memoires dynamiques connectees a son Bus, et ceci sans la 
moindre perte de temps, puisque le rafraichissement est effectue 
pendant les portions d' instructions n'utilisant pas la memoire. 
Les RAM dynamiques constituent ce que nous appellerons la "memoire 
centrale" . 
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Selon la version qui equipe le TRS-80, 4 K octets en standard, ou 
16 K en option, on aura affaire a deux types de boitiers 
compatibles entre eux et interchangeables et montes fort heureu- 
sement sur supports enfichables (SOCKET) ; 4 K bits en version 
4 K octets (8 boitiers) , 16 K bits en version 16 K octets (8 
boitiers) . 

La memoire RAM dynamique du TRS-80 peut, moyennant une "expansion 
interface" etre amenee a un total de 48 K octets (16 K dans le 
clavier + 16 ou 32 K dans l'expansion interface). Ces memoires 
(4 ou 16 K) possedent 16 pattes de sortie. On remarquera que 
seulement 7 fils d'adresses sont utilises, ce qui ne permettrait 
normalement d'adresser que 128 cellules. Or on en adresse 
reellement 16384 ! Quel est done ce mystere ? 
Pour realiser ce petit tour de magie, on utilise le mode 
d'adressage dit "MULTIPLEXE 1 , ce qui signifie que l'on envoie 
d'abord sur les 7 fils d' adresse, une adresse ligne, puis le 
temps d'apres une adresse colonne. En fait, on envoie a la 
memoire (mais en deux fois) , l'equivalent de 14 fils d' adresse... 
Voila le mystere qui tombe ! (bien entendu, pour les 4 K, 6 fils 
d'adresse seulement sont utilises au lieu de 7). 

Puisque nous en sommes au chapitre des memoires, il est peut 
etre bon d'en citer un autre type, non utilise dans le TRS 80, 
mais qui pourra 1 ' etre par la suite, e'est la memoire EPROM. Elle 
ressemble a la ROM, mais elle possede une petite "fenetre" sur le 
dessus du boitier, qui permet de l'ef facer dans sa totalite 
lorsqu'elle est exposee aux rayons ultra-violets pendant 20 a 30 
minutes. On peut ensuite y reecrire un nouveau programme a l'aide 
d'un appareil special. 

Les capacites atteintes actuellement dans ce type de memoire sont 
de 4 K octets (32 K bits) . Comme pour la ROM, toute tentative 
d'ecriture dans une EPROM par programme serait vaine. 
Elle est en principe utilisee pendant la phase de mise au point 
d'un logiciel qui risque d'evoluer ou d'etre modifie avant la 
phase finale d'ecriture en ROM. 
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Les operateurs logiques 

Seront regroupes sous cette appellation les circuits 
electroniques realisant des operations booleennes elementaires 
(et, ou, non-et, non-ou ; ou, selon la terminolo'gie anglo- 
saxonne : and, or, nand, nor) . Les figures ci-contre montrent les 
principaux operateurs et les dif ferentes f agons de les representee 

Les amplif icateurs et inverseurs trois etats (TRI-STATE) sont 
representes avec une porte de validation (GATE) , en general 
commune a tous les circuits du mime boitier. 
Lorsque cette porte est en niveau logigue "1", la sortie du 
circuit est a haute impedance et elle n'a, de ce fait, aucune 
action sur les autres sorties qui lui sont reliees. Ces outils 
logiques sont en general employes dans le cas de raccordements 
aux Bus . 

Par contre, lorsque la porte de validation est au niveau logique 
"0", 1' amplif icateur ou l'inverseur fonctionne normalement (voir 
figure ci-dessous) . 
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Les memoires sont elles-memes equipees d'une maniere interne, 
d' entrees/sorties 3 etats. 
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Cela permet, par exemple, de relier entre elles plusieurs sorties 
"collecteur ouvert" . Nous en verrons l'utilite lorsgue nous 
aborderons le principe de f onctionnement du clavier. 



Les circuits fonctionnels 

Ce sont des circuits qui realisent des fonctions de codage/ 
decodage, de comptage, de division de frequence, de serialisation 
de donnees paralleles etc. . . 

lis sont composes, pour la plupart, de bascules et d'operateurs 
logiques, et permettent un niveau d' integration plus pousse. 
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LE LOGICIEL ' 

Depuis le debut de ce livre, votre regard est souvent tombe sur 
des mots tels que : binaire, langage-machine, langage evolue, 
octets, bits... etc. Selon notre conseil, vous etes passe outre. 
Mais maintenant il est temps de s'expliquer un peu et, bien qu'il 
existe de noitibreux ouvrages sur ce sujet, ecrits par des 
specialistes, nous allons essayer, non pas de definir, mais 
d'expliquer l 1 utilisation faite de ces mots. 

D'abord, la notion de langage. Si vous essayez de converser 
avec un Chinois, vous ne tarderez pas a vous apercevoir qu'il 
serait vain de continuer le dialogue. De deux choses l'une : soit 
vous devez apprendre le Chinois, soit il doit apprendre le 
Frangais, a moins que vous decidiez (si toutefois vous arrivez 
a vous faire comprendre) , de "couper la poire en deux" et 
d' apprendre une langue commune. C'est cette solution qui a ete 
retenue avec l'ordinateur : il a ete programme dans sa langue 
maternelle (le langage machine), afin de comprendre un langage 
evolue (Basic) situe a mi-chemin entre celui de 1 ' homme et de la 
machine (soyons honnete, plus pres de 1 ' homme que de la machine !). 
De votre cote, vous devrez faire l'effort necessaire pour 
apprendre ce langage tres simple. 

Afin de donner a ce langage (le Basic) , un caractere universel, 
le vocabulaire retenu a ete 1* Anglais (peut-etre aussi parce que 
ceux qui l'ont fait les premiers parlaient cette langue). Mais, 
pour l'ordinateur, peu importe la langue. Un mot est, pour lui, 
une suite de caracteres correspondant a une fonction precise. 
Son programme interprete (interpreteur Basic) , decode, reconnait 
cette suite de caracteres et lui af f ecte les ordres correspondants 
mais dans le langage maternel du microprocesseur (le Binaire) . 

Prenons une analogie. Si l'on vous dit "ecrivez le mot lune" 
(langage evolue), votre propre "programme" , toujours en attente 
d' informations, captera par vos oreilles (organe d' entree 
peripherique) et reconnaltra ces mots (instructions) . II 
"interprete" alors cet ordre en le decomposant en une suite 
d' instructions plus fines telles que : tendre la main, prendre 
le crayon, s'approcher du papier, toucher le papier avec la 
pointe du crayon... etc (langage machine) qui, envoyees au 
cerveau (microprocesseur) sous forme codee, vont declencher les 
stimuli necessaires vers les muscles concernes (ecriture, 
impression) . 
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Avec l'ordinateur , il se passe a peu pres la meme chose mais, 
comme il n'a pas d'oreilles (tout au moins pas encore) , il faudra 
frapper au clavier : 

PRINT "LUNE" 
suivi d'une touche speciale indiquant la fin du message. Ca 
marche ! Le mot "LUNE" est apparu sur l'ecran... II a compris ! 
Le mot basic "PRINT" signifie en effet "IMPRIMER" en Anglais. Le 
vocabulaire Basic etant reduit, si vous frappez au clavier : 

WRITE "LUNE" 
(ecrire "LUNE"), l'ordinateur ne comprendra pas car ce mot 
n'existe pas en langage Basic, ce qui entralnera de la part de 
l'interpreteur une injure du style "ERREUR DE SYNTAXE" . . . 

Passons maintenant au langage dit "ASSEMBLEUR" . C'est le 
langage propre a chaque ordinateur et generalement dif f erent d'un 
ordinateur a 1' autre, mais exprime sous forme symbolique. Pour 
revenir a notre analogie, c'est un peu comme si on vous avait 
dit, au lieu de "ecrivez lune" : "tendez la main, prenez le 
crayon, approchez vous du papier, . . . etc" 

Chaque microprocesseur a "son" assembleur, Z 80, 8080, 6800, 
6502. . . 

A chaque instruction symbolique du langage d' assemblage 
correspondra une, et une seule, instruction "machine" elementaire. 
Cette conversion sera realisee par une sorte d' interpreteur 
egalement, nomme "le programme assembleur". 

L'ordinateur ne comprenant reellement que le Binaire, c'est a 
dire une succession de 1 et de 0, il est plus pratique d' ecrire : 

LD A, 5 
ce qui signifie : chargement de la valeur 5 dans le registre 'A' 
(c'est la forme symbolique), piutot que : 

0011111000000101. 
Une forme plus contractee serait d 1 ecrire : 

3E05 
ce qui a la meme signification, mais la le systeme de numerotation 
n'est plus binaire (base 2) mais hexadecimal (base 16) . 
Resumons-nous : 

LD A, 5 0011111000000101 3E05 

SYMBOLIQUE BINAIRE HEXADECIMAL 

Voici 3 f aeons de representer la meme chose. Laquelle des trois 
pref erez-vous ? 

Lorsque l'on sait que "LD" signifie "LOAD", e'est-a-dire 
"chargement" en Anglais, la forme "LD A, 5" parle toute seule : 
Charger A avec la valeur 5. 
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BINAIRE, HEXADECIMAL : qu'est-ce que c'est ? Ce sont des 
systemes de numerations . 

Pourquoi, lorsque nous additionnons 1 a 9, devons-nous mettre 
un au chiffre des unites et un 1 au chiffre des dizaines ? 
Parce que nous n'avons que 10 symboles (0 a 9) pour compter. Nous 
comptons en decimal, autrement dit en base 10. Au dela de 9, il 
n'y a plus d'autres symboles, il faut done repartir a et ajouter 
un chiffre a gauche. 

En BINAIRE (base 2), il n'y a que deux symboles : et 1, parce 
que c'est plus facile pour un ordinateur (un trou/pas de trou ; 
un signal/pas de signal ; une magnetisation/pas de magnetisation). 
Au dela de 1, il n'y a pas de 2 . II faut done repartir a et 
ajouter le 1 a gauche, ce qui fait : 







1 






+ 1 






10 


continuons : 






10 






+ 1 






11 


pas 


de 


probleme. . 
11 
+ 1 



100 
Logique, non ? 
4 font done 100 en Binaire. 
De meme, 15 font 1111. 

Mais la ou cela se complique, c'est lorsqu'il faut dire que : 

40697 font 1001111011111001. 
C'est assez encombrant. . . Aussi les inf ormaticiens ont-ils decide 
d'exprimer la meme chose, mais sous une forme plus simple, en 
utilisant la base 16, e'est-a-dire exprimee avec 16 symboles. 

En HEXADECIMAL , cette fois 9 + 1 ne font pas 10, mais 'A' (le 
dixieme symbole de la base). L'astuce a done ete de remplacer les 
symboles manquants au dela de 9 par les premieres lettres de 
l'alphabet 'A' a 'F'. F + l font 10 en base 16, et 40697 en base 
10 font 9EF9 en base 16, ce qui se represente 9EF9H, le 'H' 
signifiant 'hexadecimal'. 
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Pour passer du binaire a 1' hexadecimal, il suffit d'apprendre 
par coeur les 16 premiers nombres et leurs correspondances 
hexadecimales et decimales : 



BINAIRE 


HEX A 


DECIMAL 


0000 








0001 


1 


1 


0010 


2 


2 


0011 


3 


3 


0100 


4 


4 


0101 


5 


5 


0110 


6 


6 


0111 


7 


7 


1000 


8 


8 


1001 


9 


9 


1010 


A 


10 


1011 


B 


11 


1100 


C 


12 


1101 


D 


13 


1110 


E 


14 


1111 


F 


15 



Le nombre 1001111011111001 est ensuite divise en tranches de 4 
chiffres en partant de la droite : 

1001 1110 1111 1001 
9 E F 9 

Voila ! Ce n'est pas plus difficile ! 



Bien entendu, l'ordinateur ne comprend pas plus 1' hexadecimal 
que 1' assembleur ; mais le programme qui permet de passer de 
1' hexadecimal au binaire est tres simple. 

Pour passer du binaire au decimal, il suffit de remonter les 
puissances de 2 en partant de la droite et d' additionner toutes 
celles dont le chiffre correspondant est a 1. Exemple : 



1001 



1110 



1111 



1001 



-► 0001 
-*• 0008 
-+ 0016 
-»> 0032 
-> 0064 
-* 0128 
-> 0512 
-* 1024 
-» 2048 
-> 4096 
32768 



40697 
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Et maintenant : ce qu'on appelle un bit, un Octet ? 
Un bit, c'est 1' element binaire prenant la valeur 1 ou . 
Dans les memoires de 1' ordinateur, les nombres sont stockes sous 
forme de bits et un ensemble de 8 bits est appele un octet. Les 
instructions Basic, assembleur sont toutes codees en memoire sous 
forme de bits et d'Octets. Le nombre ci-dessus sera represente en 
memoire '1001111011111001' (sur 16 cases memoires). 

Dans un programme, autant que dans le f onctionnement intime de 
1 ' ordinateur , on est souvent conduit a executer des operations 
speciales sur les valeurs binaires. Les operations logiques de 
base sont au nombre de 3 : la complementation (NOT), le 'ET' 
logique (AND) et le ' OU ' logique (OR). 

La complementation c'est prendre le complement ou inverse de la 
valeur du bit correspondant. Exemple : le complement de la valeur 
binaire 1011 et 0100. 

Les nombres manipules par le Basic etant ordinairement representes 
sur 16 bits, le dernier bit de gauche (appele poids fort, plus 
forte puissance de 2) , represente le signe du nombre (positif si 
0, negatif si 1) . Dans ce cas, le complement de 1011 sera 
1111111111110100, c'est-a-dire -12 en decimal, puisgue si l'on 
ajoute 12 a cette valeur, on repasse a zero : 



1111 
+ 0000 



1111 
0000 



1111 
0000 



0100 
1100 



00000 



0000 



0000 



0000 



(le 1 encadre ne compte pas, on dit qu'il a deborde) . 

En Basic, si vous frappez : PRINT NOT 11 ; 1' ordinateur vous 

repondra : -12. 

Mais attention : les nombres manipules par les operateurs 

logiques ne peuvent depasser la valeur 32767 (15 bits en binaire). 



Le 'ET' logique : ici, le resultat logique de 2 bits egaux a 
1 sera tou jours 1. Dans les autres cas, il prend la valeur 0. 
Exemple : 



01C1 



'ET' 



00 



110 



( = 11) 
(= 6) 



ooHyo (= 2) 

En basic, PRINT 11 AND 6, donnera 2. 
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Le 'OU' logigue : dans ce cas, le 1, s ' il est present 1 ' eraporte 
tou jours. Exemple : 



1 OU ' C 1 



10 



11 



En basic, PRINT 11 OR 6, donnera 15. 



( = 11) 
(= 6) 

( = 15) 



En Basic, comme dans tout langage de programmation evolue, les 
nombres sont representes dans le systeme decimal. Selon la 
notation anglo-saxonne, la virgule est remplacee par le point 
decimal. Ainsi : 2,25 s'ecrit : 2.25 

Un nombre est dit entier lorsqu'il n'a pas de point. Exemples : 
3, 25, -1246 

Tout nombre ayant un point est dit r&el. Exemples : 1.25, .5, 1., 
-2.4 

En Basic II, un nombre peut etre defini avec l'un des deux types 
de precision : la simple ou la double (elles sont respectivement 
notees ! et^jjfeen Basic) . 

En simple precision, 6 chiffres au maximum peuvent etre utilises, 
alors qu'en double precision, 16 sont permis. 

Une fagon pratique de representer de tres petits ou de tres 
grands nombres est de les ecrire en notation scientifique : 
2.25E9 signifie qu'il faut deplacer le point decimal de 9 chiffres 
vers la droite ou la gauche, selon le signe de l'exposant, pour 
obtenir la valeur reelle du nombre. 

2.25E9 = 2 250 000 000 
2.25E-9 = 0.000 000 002 250 

En double precision, on utilise le 'D r en place du 'E'. 
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CHAPITRE 4 

LE BASIC 1 1 



Introduction pratique 

II ne sera pas question ici du Basic niveau 1, cette version 
etant un sous-ensemble de celle que nous allons examiner ci- 
apres. Nous nous contenterons d'en rappeler les commandes en 
annexe . 

Pour pratiquer le Basic "sur le tas", le mieux est d'abord de 
mettre la machine sous tension et de pianoter un peu . N'ayez 
aucun scrupule : etant tres patient de nature, l'ordinateur ne 
se vexera pas s'il ne comprend pas toujours ce que vous essayez 
de lui dire. II se bornera, dans ce cas, a repeter inlassablement 
"SYNTAX ERROR" ou quelque chose du merae style. 

Des la mise sous tension, ce qui semble etre une question 
apparait sur l'ecran : MEMORY SIZE? 

Kekcekga MEMORY SIZE? C'est lui qui pose des questions 
maintenant ? Ne vous paniquez pas. II veut tout simplement vous 
demander la taille maximum de l'espace memoire que vous voulez 
reserver pour les programmes Basic, ceci dans le cas ou vous 
voudriez charger en memoire un programme binaire devant coexister 
avec un programme Basic. 
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MONITEUR + 
INTERPRETEUR 



Espace 

programme 

BASIC 



MONITEUR + 
INTERPRETEUR 



Espace 

programme 

BASIC 



RESERVE 



Adresse memoire 
XXXX en decimal 



MEMORY SIZE?<ENTER> MEMORY SIZE? XXXX <ENTER> 

Dans le cas present, mieux vaut repondre en appuyant sur la touche 
'Enter 1 , sachant que ces questions-la seront examinees en details 
dans le volume II plus specialement consacre au langage machine. 

Apres un court instant, variable selon la taille memoire dont 
vous disposez, un message securisant apparait : 
> READY 

Ce qui signifie quelque chose comme : "Je suis pret, maitre, 
j ' attends vos ordres." 

A noter que, sous Basic 2, le signe ">" en debut de ligne a 
toujours ce sens lorsqu'il est affiche par le moniteur. II faut 
savoir egalement que tout ordre transmis a l'ordinateur sera 
toujours termini par la touche 'Enter' qui correspond a 'Fin de 
message' . Aussi, dans ce qui suit, toute commande ou ordre sera 
termine par cette touche, meme si cela ne figure pas explicitement 
dans les exemples. 

Ordonnons done, puisque nous pouvons donner des ordres : 

PRINT "LUNE" 

Le message "LUNE" est imprime sur l'ecran (voir chapitre precedent) . 

Continuons : 

PRINT LUNE 
Le chiffre est imprime. Pourquoi ? 

Dans le premier cas, le mot LUNE etait entoure de guillemets, 
ce qui indiquait une chalne de caracteres (un texte) que 
l'ordinateur ne devait pas toucher (interpreter). 
Dans le second cas, il n'en est pas de meme. L' interpreteur 
essaye done de comprendre un peu, et recherche dans tous ses 
'tiroirs de rangement" celui etiquete "LUNE". II le trouve et en 
imprime le contenu. Mais, comme tous les tiroirs ont ete mis a 
zero au depart, il imprime done 0. 
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Essayons maintenant : 

LUNE = 1234 
PRINT LUNE 

Ca marche ! La premiere commande a charge la valeur 1234 dans le 
tiroir etiquete LUNE. La seconde commande a imprime le contenu du 
tiroir LUNE. 

Essayons encore : 

PRINT LUNE (affichage de : 1234) 
PRINT LUGE (affichage de : 1234) 

Tiens ? II y a des tiroirs qui communiquent entre eux ? 

Non ! En fait, 1* explication est toute simple : le nom de chaque 

tiroir ne possede que deux caracteres au maximum, le reste des 

caracteres au dela de deux est tout bonnement ignore. 

Pour l 1 interpreteur, LUNE et LUGE designent le meme tiroir. II 

faut le savoir, c ' est tout ! 

Si vous avez compris cette notion de tiroir, et bien vous avez 

compris la notion de "variable", qui est le mot plus "scientif ique" 

consacre a cette appellation. Une variable est done un tiroir 

qui peut contenir des choses variables... 

Poursuivons notre idee : il y a plusieurs sortes de tiroirs : 

- des tiroirs ne pouvant recevoir que des nombres (variables 
numeriques) , eux-memes divises en quatre categories : les 
tiroirs a nombres entiers, les tiroirs simples a 6 chiffres 
(simple precision), les doubles, a 16 chiffres, (double 
precision) et les tiroirs a casiers (variable indicee) . 

- des tiroirs pouvant recevoir des caracteres alphanumeriques 
(chiffres, lettres, caracteres speciaux) . On les appelle des 
variables de chaine. 

Pratiquons un peu avec une "variation sur le nombre PI". 
Vous connaissez tous le nombre PI ; 1 ' ordinateur , lui, ne le 
connalt pas. Pour le lui apprendre, frappons au clavier : 

PI = 3.1416 (mettre 3.1416 dans le tiroir PI) 
Ca y est ! II le connait maintenant. La preuve : 

PRINT PI declenche le message : 3.1416 

Mais PI sur 2, ga fait combien ? 

PRINT PI/2 (le signe / est employe pour 'diviser') 
1.57 08 ... dit-i.l. Correct 
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Voulons-nous conserver cette valeur dans un autre tiroir (que 
nous appellerons P2, par exemple ?) Rien de plus simple : 

P2 = PI/2 

Mais jusqu'ici, nous n'avons pas encore reellement "ecrit" un 
programme. Nous ne faisons qu'utiliser 1'ordinateur en mode 
' calculateur ' (par opposition au mode 'programme'). Un programme : 
ce sera une suite d r instructions identiques S celles que nous 
avons executees jusqu'a present, mais precedees d'un numero de 
ligne. Ces numeros seront quelconques, la seule regie etant de 
respecter un ordre chronologique croissant dependant de 1 ' ordre 
d' execution des instructions. 

Frappons done notre premier programme au clavier : 

10 PI = 3.1416 
2 PRINT PI 

remarquez qu'ici il ne se passe rien, 1' ordinateur attend 1' ordre 
pour executer le programme avant d'imprimer. Continuons : 

30 P2 = PI/2 
4 PRINT P2 

Voila ! Maintenant, executons notre programme en frappant 1' ordre 
adequat (lancement de programme) : 

RUN 

Si vous n'avez pas fait d'erreur (sinon vous devrez ref rapper 
la ou les lignes erronees) , 1' Scran doit afficher : 

3.1416 
1.5708 

suivi du message : 

READY 
> 

Mais cela n'est pas tres parlant. Frappez : 

2 PRINT "PI=" ; PI 

4 PRINT "PI SUR 2=" ; P2 

Les lignes 2 et 4 sont automatiquement remplacees . 

RUN 

Vous devez avoir cette fois : 
PI= 3.1416 
PI SUR 2= 1.5708 
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Remarquez les "signes ";" des lignes 20 et 40. lis servent a 
separer les differents champs d' impression. Essayez d'en mettre 
un a la fin de la ligne 20. Vous aurez : 

PI= 3.1416 PI SUR 2= 1.5708 

Remplacez-le maintenant par une virgule : 

PI=3.1416 PI SUR 2= 1.5708 

C'est ce que l'on appelle une "tabulation", tres utile pour la 
mise en page des tableaux. Le signe "," est aussi un separateur. 



Voila qui vous donne un avant-gout de ce que peut etre la 
programmation en Basic sur le TRS-80. Une chose reste a faire 
maintenant : apprendre a connaitre les differents mots du 
vocabulaire Basic. Les pages suivantes vous y aideront, mais ne 
restez pas dans la theorie : Pratiquez... ! Pratiquez... ! C'est 
le secret pour 1' apprentissage d'un langage, qu'il soit humain ou 
non. 

Bien sur, vous ferez probablement des erreurs : c'est parfait ! 
c'est le metier qui rentre ! Cherchez a les comprendre et a les 
corriger . 

Avant de voir les differents mots utilises dans un programme 
Basic, nous allons passer en revue les commandes du moniteur et 
les fonctions qu'elles realisent. 
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COMMANDES MONITEUR 



RUN 



Vous l'avez deja utilisee. C'est elle qui permet de lancer 

l 1 execution d'un programme Basic charge en memoire. Deux formes 

sont possibles : 

RUN 

RUN numero de ligne 
Dans le premier cas, le programme est lance a la premiere ligne, 
alors que dans le second il est lance a partir d'un numero donne 

exemple : 

RUN 2 
C'est 1' occasion de remarquer que chaque commande RUN est 
toujours precedee d'une remise a zero des "tiroirs". En effet, 
la ligne 10 du programme n'ayant pas ete executee, les valeurs 
de PI et de P2 seront trouvees egales a zero. 

LIST 

Essayez de f rapper cette commande, et vous en comprendrez 

immediatement l'utilite (si le programme precedent est toujours 

en memoire) . Cette commande vous donne en effet la liste des 

lignes formant le programme present en memoire. 

Si le programme est long, la liste peut etre momentanement 

suspendue par l'appui sur les touches SHIFT et @ . La prochaine 

touche enfoncee fait progresser la liste, etc... 

Naturellement la touche BREAK peut etre employee, mais elle 

interrompt la liste def initivement . 

Cette commande peut prendre plusieurs formes : 

LIST (liste a partir de la premiere ligne) 

LIST n° ligne (liste de la ligne specifiee) 

LIST nl - n2 (liste de la ligne nl a la ligne n2) 

A noter que nl ou n2 peut etre omis . Essayez pour voir... 

NEW 

Frappez cette commande au clavier. Executez ensuite la commande 
LIST. L'ancien programme a tout simplement disparu. Dommage ! 
apres tout ce temps passe a le rentrer ! Vous avez compris 
maintenant que cette commande est a utiliser avec premeditation. 
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AUTO 

Voici une facilite qui vous permettra de re-entrer votre 
programme. Faites : AUTO ENTER. Le numero de ligne 10 est af f iche 
automatiguement. Frappez ensuite la premiere ligne du programme : 

PI = 3.1416 <ENTER> 

et ainsi de suite jusqu'a la derniere ligne. Pour arreter, 

appuyez sur la touche BREAK. Faites : LIST. 

Votre programme doit etre la de nouveau. 

Petit gadget : si en cours de commande AUTO , un caractere "s" 

est affiche a droite du numero de ligne, cela signifie que cette 

ligne est deja occupee. A vous de decider si vous voulez la 

remplacer ou non. 

La commande AUTO peut prendre les trois formes : 

AUTO (depart ligne 10 et de 10 en 10) 
AUTO n (depart ligne n et de 10 en 10) 
AUTO n,m (depart ligne n et de m en m) . 

CONT 

Cette commande sgnifie "continuer". Elle est a utiliser dans le 
cas ou le programme a ete stoppe dans son deroulement par la touche 
BREAK ou l'ordre STOP (voir plus loin). Cette commande permet 
done de relancer le programme au point interrompu. 

DELETE 

Signifie : supprimer, ef facer. Cette commande permet de supprimer 
une ou plusieurs lignes dans un programme Basic. Si vous voulez 
toutefois supprimer une seule ligne, ou des lignes non contigues, 
il est plus pratique de frapper le numero de la ligne a effae'er 
suivi de ENTER (une ligne vide est automatiquement rejetee du 
programme). Dans 1' autre cas, vous frapperez : 

DELETE nl-n2 

pour supprimer la portion de programme comprise entre les lignes 
nl et n2 indues. Si nl est omis, la portion supprimee commencera 
a la premiere ligne. 

CSA VE 

Voila la commande qui vous permettra de sauver le contenu d'un 
programme Basic sur cassette. Avant de lancer cette commande, il 
faudra toutefois veiller que le magnetophone soit bien en 
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position ecriture (boutons Record et Play enfonces) et que la 
cassette soit positionnee apres l 1 amorce non magnetisee de la 
bande . La forme de cette commande est la suivante : 

CSAVE "n" 

"n" etant un caractere alphanumerique indiquant le nom a donner au 
programme a sauver. Pendant toute la duree de 1' ecriture cassette, 
le clavier est inhibe : aucune frappe n'est prise en compte . 
Attendez que le message READY soit affiche sur l'ecran. Essayez 
maintenant de sauver le petit programme sur le nombre PI. 

CLOAD? 

Cette commande permet de verifier que votre programme Basic a bien 
ete correctement ecrit sur la cassette. Une lecture de la cassette 
est declenchee, et chaque Octet lu est compare avec son equivalent 
en memoire. En cas d'erreurs de comparaison, un message apparait : 

BAD (c'est-a-dire : MAUVAIS) 

Cette commande est de la forme : 

CLOAD? "n" 
ou "n" est le nom du programme a comparer (voir CSAVE) dans le cas 
ou celui-ci n'est pas en premiere position sur la cassette. Sinon 
"n" peut etre omis. 

CLOAD 

Cette commande permet de lire un programme sur cassette et de le 
transferer en memoire. Des son lancement, une commande NEW est 
automatiquement executee, afin de liberer la zone devant recevoir 
le programme. Deux formes possibles : 

CLOAD (Chargement du premier programme lu sur la 
cassette) 

CLOAD "n" (recherche et chargement du programme n) 

Dans le second cas, tout programme lu sur la cassette et ne 
correspondant pas au nom "n" est saute (le nom est affiche sur 
l'ecran pendant ce temps), et ainsi de suite jusqu'a trouver le 
bon nom. Pendant la lecture, un asterisque situe en haut a droite 
de l'ecran clignote selon un temps dependant de la longueur des 
lignes Basic. 

SYSTEM 

Cette commande est, comme la prScedente, une commande de lecture 
cassette, mais reservee a la lecture des programmes Binaires. 
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Certains programmes, comme 1' editeur/assemble'ur EDTASM et TBUG 

sont charges ainsi . Apres la frappe de cette commande, le message 

"x?" apparalt sur l'ecran. Le nom du programme a charger doit 

alors etre introduit (6 caracteres sont autorises) , suivi de 

"Enter". La lecture cassette commence alors, signalee par un "x" 

fixe et un clignotant (haut droit de l'ecran) . 

En cas d'erreurs de lecture, le caractere ' C prend la place de 

l'un des asterisques. II faut alors reprendre la lecture a son 

debut. 

En cas de reussite, et lorsque l'ordinateur affiche de nouveau 

"x?", repondre : 

- /ENTER pour lancer 1' execution au debut du programme ; 

- /Adr Enter, adr etant la valeur decimale d'une adresse memoire 
de lancement du programme. 

Nous n' insisterons pas davantage sur cette commande, sauf pour 
dire qu'elle peut etre utilisee aussi pour revenir au message 
initial MEMORY SIZE sans etre oblige de couper 1' alimentation. 

SYSTEM Enter 
x? /0 Enter 
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LA COMMANDE D' EDITION : EDIT 

Cette commande permet essentiellement de modifier une ligne Basic 
sans etre oblige de la ref rapper entierement. La forme d'appel est 
la suivante : 

EDIT numero de ligne Basic 

Des la frappe de cette commande (suivie de la touche Enter), et 
a condition, bien entendu, que la ligne specif iee soit presente, 
l'ecran affiche le numero de ligne. Vous etes maintenant sous le 
controle de la commande EDIT. 

Pour continuer le dialogue, vous devez utiliser un certain nombre 
de sous-commandes, selon la fonction desiree. 
Voici la liste de ces sous-commandes : 

n barre d'espace : avance curseur de n caracteres. 

<— ou n^— : Recul d'un ou de n caracteres par rapport au curseur. 

L : Liste la ligne editee. 

I : Commande d' insertion. Tout caractere frappe derriere cette 
sous-commande est insere a l'endroit pointe par le curseur. 

D ou nD : Suppression d'un ou de n caracteres apres le curseur. 
Le champ supprime est alors delimite par 2 caracteres " ! " . 

C ou nC : Remplacement (change) d'un ou de n caracteres situes 
apres le curseur. 

Sc : Recherche du caractere "c" dans la ligne editee, avec arret 
a gauche de ce caractere. Cette sous-commande peut prendre aussi 
la forme qui suit : 

nSc : Recherche du n ieme caractere "c" . Nota : ne fonctionne pas 
si le caractere a chercher est le premier de la ligne. 

Kc (ou nKc) : Suppression de tous les caracteres situes avant le 
caractere "c" (ou le n ieme caractere "c") . 

X : Insertion en fin de ligne. Le curseur va en fin de ligne et 
1'on passe en mode insertion (identique a I) . 

H : Suppression des caracteres suivant le curseur, et passage en 
mode insertion. 

E : On quitte le mode d' edition en apportant les corrections 
precedentes a la ligne editee. 
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Q : On quitte le mode d' edition, mais sans modifier la ligne (les 
corrections ne sont pas apportees) . 

A : Effacement des corrections precedentes eventuelles et retour 
au debut de la ligne editee. Pour que cette sous-commande soit 
effective, on ne doit pas etre engage dans une autre sous- 
commande. Sinon, f rapper ce qui suit : 

Shift T : Cette sous-commande permet de sortir d'une autre sous- 
commande (I par exemple) , mais sans quitter le mode EDIT. 

Enter : Toutes les modifications sont enregistrees. On quitte le 
mode EDIT. 
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LES SIMBOLES DE BASE 

Comme tous les langages evolues, le Basic est construit a partir 
d'un ensemble de symboles de base, dit "alphabet". Cet ensemble 
est simple, et varie tres peu d'un constructeur a un autre. II est 
compose : 

- de chiffres 0, 1, . . . , 9 

- de lettres majuscules A,B, . . . , Z 

- d'operateurs arithmetiques 

■ addition + 
• soustraction 

. multiplication x 

. division / 

. exponentiation ^ 

- des parentheses gauche et droite ( ) 

- d'operateurs relationnels 

. egal 

. inferieur a 

. superieur a 

. inferieur ou egal a 

. superieur ou egal a 

. different de 

- d'operateurs logiques 

. operateur "ET" 
. operateur "OU" 
. operateur "NON" 

- de caracteres speciaux 

. guillemet " 

. dollar 

. diese #* 

. point d' exclamation ! 

. pourcent % 

. et commercial ou perluete & 

. apostrophe ' 

. point d' interrogation ? 

. point 

. deux points : 

. virgule # 

. point virgule ; 

. a "escargot" ou a commercial @ 

. blanc ou espace 

Tout le langage Basic est construit a partir de cet alphabet et 
comporte essentiellement des notions : 

- de constantes, 

- de variables, 

- de fonctions, 

- de mots reserves pour definir les instructions. 



< 






> 






< = 


OU 


= < 


> = 


ou 


= > 


<> 


ou 


><. 


AND 






OR 






NOT 
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LES CONSTANTES ET LES VARIABLES 



II existe deux types de constantes et de variables : 

Les constantes "numeriques" qui sont representees en virgule 
flottante et les variables "numeriques" 
Les constantes "chaine" et les variables "chaine" ou 
"alphanumerique" (String en americain) . 

Constante numevique : 

Une constante numerique est representee sous l'une des trois 
formes suivantes : 



- entiere 

- decimale 

- decimale avec exposant 



-3,245 

3.141592654 0.654 
.3145926E+01 



Lorsque la constante est positive, le signe + peut etre omis. 
Par contre, pour representer un nombre negatif, il est imperatif 
de faire preceder la constante du signe -. 

Constante chatne : 

Une constante chaine est une suite de caracteres quelconques 
bornee par les caracteres speciaux "guillemets" . 

"TRS-80" "BASIC" , "1234567890" 

sont des constantes "chaine". En Basic II, une constante chaine 
peut avoir une longueur de a 255 caracteres au maximum ("" est 
une constante de chaine nulle) . 

Variable 

Une variable est designee par un nom (ou identif icateur de 
variable) forme par une suite de caracteres alphanumeriques, le 
premier devant etre obligatoirement alphabetique (A-Z) . 
Exemple : A, CX, F5 TOTAL ; pourraient etre des noms de 
variables . 

En Basic II, seuls les deux premiers caracteres sont signif icatif s . 
Une petite remarque au passage : eviter absolument les identi- 
ficateurs de variables renfermant un mot reserve. (La liste de 
tous les mots reserves est donnee en annexe) . 
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Pour definir la nature d'une variable, on ecrit a droite du nom 

de la variable un caractere special : ce caractere tient lieu 

d'attribut. 

Le Basic du TRS-80 reconnalt quatre sortes d'attributs : 

% pour une variable entiere : A% AB% C3% 

! pour une variable simple precision : A! AB ! C3 ! 

:jifc pour une variable double precision : A^AB^C3^jt 

$ pour une variable de chaine : AJ5 AB# C2>$ 

Si un nom de variable n'est pas suivi d'un attribut, elle est 
consideree, par defaut, comme etant du type simple precision. 

Exemple : D4 et D4 ! 



Declaration de variables 

Declarer une variable, c'est definir une fois pour toutes son 
type. II existe a cet effet, dans le Basic, quatre mots reserves 
pour definir les attributs d'une variable ou d'une liste de 
variables . 

Cette possibility, offerte par le Basic du TRS-80, permet 
d'alleger considerablement l'ecriture des variables et d'optimiser 
1' occupation memoire du programme. 

DEFINT : pour declarer une ou plusieurs variables entieres. 

DEFSNG : pour declarer une ou plusieurs variables simple precision. 

DEFDBL : pour declarer une ou plusieurs variables double precision. 

DEFSTR : pour declarer une ou plusieurs variables de chaine. 

Exemple : 

DEFINT A 
Toute variable commengant par la lettre A est consideree comme 
entiere : A, A6 , AJ, ATCK... sont des variables entieres. 

DEFINT A- I 
definit comme entieres toutes les variables commengant par une 
des lettres A, B, C, D, E, F, G, H, I. Al , C3,I2,BB... sont des 
variables entieres. 

DEFINT C,K,M 
Seules les variables commencant par une des lettres C, K, M sont 
considerees entieres. CT, K2, MR, KLE... sont des variables 
entieres. 

DEFINT A,G,I-Z 
declare comme entiere toute variable commengant par une des 
lettres A, G, et de I a Z comprise. 
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La mSme regie est appliquee a DEFSNG, DEFDBL et DEFSTR. 

II faut cependant noter que l'on ne peut rencontrer la meme lettre 

dans des declarations de types dif ferents . Ainsi 

DEFINT A-D 

DEFSTR C 
La deuxieme ligne n'est pas correcte, car la variable C a deja 
ete declaree entiere ; a moins que ce ne soit intentionnel . 



Les variables indiaees 

On designe frequemment un ensemble de quantites de meme nature 
par un nom unique, auquel on ajoute des indices, comme en 
mathematiques par exemple, les n composants d'un vecteur V dans 
un espace a n dimensions seront denommes : V(l), V(2)...V(n). De 
meme, les nxp elements d'une matrice M seront denommes : M(l,l), 
M(l,2) , . . . ,M(l,p) , M(2,l), M(2,2) , . . .M(n,p) . 

L' ensemble de tous ces elements s'appelle un tableau. 
En Basic, une variable indicee, done un element de tableau, se 
reconnait par la presence, a droite de 1' identif icateur de la 
variable, d'une expression entre parentheses, qui caracterise 
1* indice. 

Pour faire reference a une variable indicee, par exemple B(6), 
dans une expression arithmStique, nous Scrirons : 

...B(6) ... 
L 1 indice peut etre lui-meme une variable : 

...B(I) ... 
L' indice peut, lui-meme, itre une variable indicee : 

...B(I(J)) 
Ici, 1' indice de B est represents par I ( J) . 

L' indice d'une variable est toujours une constante entiere 

positive, superieure ou egale a zero. 

Si 1' indice n'est pas une valeur entiere, la valeur qui est 

consideree represente la partie entiere de 1' indice (troncature 

et non pas arrondi) . 

Exemple : 

100 1=15.9 

120 A(I)=5.78 

140 X=A(I) 

La valeur prise pour A(I) sera A(15) , et le resultat dans X sera 
5.78. 
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Tableau a N dimensions . 



Considerons le schema suivant 





Q 
1 

3 
4 


TABLEAU 
COLONNE 


-A 



LIGNE 


A(0) 




A<1> 




A(2) 




A(3) 


LIGNE 


A<4> 



TABLEAU -B- 
CQLQNNE COLONNE 1 



R(n 


m 


B(Q? 


1 ) 


B( i 


0) 


R( 1 , 1) 


B( 2 


0) 


B(2 


1 ) 


R<n 


m 


B(3 


1) 


B(4 


0) 


B(4 


i ) 



Le tableau -A- represente un ensemble de 5 elements A(0) a A(4) , 
ranges sur une seule colonne. On dit que c'est un tableau a une 
dimension. 

Le tableau -B- represente un ensemble de 10 elements, ranges sur 
5 lignes et sur 2 colonnes B(0,0) ... B(4,l) . On dit que c'est 
une matrice de 5 lignes par 2 colonnes. 

II n'y a, en principe, pas de limites au nombre de lignes et de 
colonnes d'un tableau. Ces caracteristiques sont appelees 
communement : la dimension d'un tableau. 

Dans un programme Basic, lorsque l'on veut utiliser un tableau, 
il est imperatif de definir sa dimension. 

L' instruction DIM permet de declarer la dimension d'un tableau, 
quelle que soit sa nature ( I ffi % OU^) 

La forme d'ecriture de cette instruction est la suivante : 
DIM nom (DIM1,DIM2, . . . ,DIMK) 

nom represente le nom donne au tableau. 
DIM1,..,DIMK les dimensions du tableau. 

Pour definir l'exemple precedent, on ecrirait : 
10 DIM A (5) 
20 DIM B(5,2) 

Une meme instruction DIM peut declarer plusieurs tableaux. 
Exemple : 

10 DIM A (5) ,B(5,2) ,C(3,2,5) 
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Les variables de "chaine" peuvent egalement etre indicees . 
Si le tableau -A- etait un tableau de chaines , on le definirait 
ainsi : 

10 DIM A $ (5) 
100 A $ (4)="TRS-80" 
140 X#=A#(4) 

La variable X$ prendra pour valeur la chaine "TRS-80". 

Remarque zmportante et inter essante sur les tableaux 

Un tableau peut avoir le meme nom gu'une variable non indicee, 
ce sont deux notions differentes. Si l'on ecrit : 

10 DIM A(5) 

20 A (3) = 10 (10 dans le 3§me element du tableau A) 

30 A = 3 

la variable A contiendra 3, et n'a rien de coramun avec le 
tableau A. 



L' INSTRUCTION D ' AFFECTATION - et LET 



Cette instruction permet d'affecter la valeur d'une expression 
a une variable. Le symbole d' affectation que nous avons d' ailleurs 
deja rencontre est le caractere egal (=) . 

L 1 affectation consiste a donnar a la variable citee a gauche du 
= la valeur de 1' expression qui se trouve a sa droite. 

Quand vous ecrivez en mathematiques : C=10, vous affectez la 
valeur 10 a la variable C ; de meme, si vous ecrivez X=A+(B*B), 
vous affectez la valeur de l 1 expression A+(B*B) a la variable X. 
Et bien, en Basic, c'est la meme chose. 

Vous ecrirez A=10, B4#: = 2.4567, I%=8, X=A+(BXB) et aussi 
C0="TRS-8O" ; dans ce dernier cas, la valeur affectee a la 
variable de chaine C# est representee par la chaine de caracteres 
"TRS-80". Les caracteres guillemets qui encadrent TRS-80 ne font 
pas partie de la chaine. lis ont pour but de la delimiter. 

L' instruction LET a le meme effet, mais l'ecriture est un peu 
dif f erente . 
On ecrira 

LET A=10, LET A0="TRS-8O" 
tout comme 

A=10 ou Ag=" TRS-80" 
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Ce qui signifie, en clair : Faire A=10 et Faire A#="TRS-80". 
Cette forme d'ecriture est moins utilisee. Elle permet d' assurer 
une compatibilite avec d'autres Basic qui n'admettent pas 
1' affectation precedente. Aussi, pour des raisons evidentes de 
simplification, nous utiliserons la premiere notation. 

Nous venons de voir 1 ' affectation d' une constante a une variable, 
on peut aussi affecter une variable a une autre variable. 
Exemple : 

A=10 

B2=A ; B2 aura pour valeur 10 
de mime CS="TRS-80" 

B20=C# ; B20 aura pour valeur TRS-8 0. 

Par contre, B2#=A ets une forme d'ecriture incorrecte, car B20 
est une variable de chaine et "A" une variable simple precision ; 
sauf si "A" a ete declare par DEFSTR. 

DEFSTR A-D 

XS="TRS-80" 

A=X0 ; est correct 

D=A ; est egalement correct 

en outre A# =12.45 

C=A^t ; est correct, car la variable double 
precision A#.est convertie en variable simple precision. 

Les conversions de ce type sont possibles avec le Basic du TRS-80 
mais ce n'est pas le cas pour la plupart des Basics ! 

Un petit conseil, prenez garde aux troncatures et aux arrondis, 
quand une variable est convertie dans une variable de precision 
inf erieure. 

Si, par exemple : 

A#=l. 23456789 

B=A^£ ; B aura pour valeur 1.23457 

C%=A^fr ; C% aura pour valeur 1. 

EVALUATION DES EXPRESSIONS ARITHMETIQUES 

Comme en mathematiques, les parentheses jouent en programmation 
un role tres important. Les expressions arithmetiques peuvent 
aller de la simple expression du genre A=-10 a une expression du 
genre X=X+SIN (X) / ( 1+SQR(ABS (X*3) ) par exemple, en passant par 
d'autres formes plus embrouillees . 
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Lorsque l'on n'est pas sur de l'ordre dans lequel sera evaluee 
1' expression, on pourra toujours preciser cet ordre en ajoutant 
des parentheses. 

L r interpreteur Basic effectue les operations entre parentheses 
en procedant comme suit : 

1. II calcule chaque "sous-expression" entre parentheses, en 
commengant par la sous-expression la plus interieure. 

2. A profondeur egale, il evalue la sous-expression situee le 
plus a gauche dans 1 'expression. 

3. II execute les operations les plus prioritaires selon les 
regies de priorite du tableau suivant : 



QPERATEUR 



* EXPONENTIATION 

* NEGATION 

* MULTIPLICATION & DIVISION 

* ADDITION ET SOUSTRACTION 

* OPERATEURS RELATIONNELS 



NOTATION PRIORITE * 



* ./ 3 

+ - 4 

NOT AND OR 5 



Exemple : 

Y = A+BXCOS(X)-(3XXt2)/5 

1. Evaluation de (3*Xf 2) : il calcule les resultats 
intermediaires qu'on appellera arbitrairement PI et P2 : 

PI = X t2 
P2 = 3*P1 

2. Evaluation de BXCOS(X) et les resultats intermediaires P3 

et P4 -. 

P3 = COS(X) 

P4 = B*P3 

3. Calcul de (3*Xt2)/5 a partir de P2 : 

P5 = P2/5 

4. Addition et soustraction : 

A+P4-P5 

Pour evaluer une expression ne contenant aucune parenthese, et 
a priorite egale, on commence par les operations situees le plus 
a gauche dans 1' expression. 

Pour en terminer sur ce point, retenez cette simple regie : 
mettez entre parentheses les operations que vous voulez effectuer 
en premier lieu. 
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LES FONCTIONS STANDARDS DU BASIC II 

X=SQR(12) 

Dans cet exemple, SQR ( . . ) represente une fonction standard du 
Basic II. Dans un programme, on peut faire reference a certaines 
fonctions connues du Basic, sans avoir a les definir au prealable, 
Ces fonctions, appelees fonctions standards peuvent se classer en 
guatre categories : 

- les fonctions mathematiques usuelles, 

- les fonctions de conversion, 

- les fonctions relatives au traitement des chaines de caracteres, 

- les fonctions speciales. 

IMPORTANT : 

Une fonction est toujours situee a droite du symbole d' affectation. 
X=F (...) et non F (...) = .. . 

Le resultat delivre par une fonction mathematique est toujours 
exprime en simple precision. 

Toutes les fonctions du Basic, a part quelques exceptions 
evidentes, sont recur sives. C'est-a-dire qu'une fonction peut 
s'appeler elle-meme plusieurs fois. 

Un exemple de recursivite : 

A=SQR(SQR(4) ) 
selon la regie d' evaluation des expressions que nous avons vue 
plus haut, SQR (4) est d'abord calcule, ce qui donne 2 ; puis 
SQR(2) est evalue, ce qui donne comme resultat final : 1.141421 



Les fonctions mathematiques usuelles 

ABS(X) 

Donne la valeur absolue d ' un nombre (signe toujours positif) . 

ABS(12.75) donne 12.75 
ABS(-65.3) donne 65.3 
ABSC-5.9) donne 5.9 

INT(X) 

Donne la partie entiere de X. Le plus grand entier inferieur ou 
egal a X ne se calcule pas de la meme maniere selon que X est 
negatif ou positif. 
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INT (12. 5) donne 12 

INT (-3. 5) donne -4 

INT (.5) donne 

INT (.-5) donne -1 

FIX(X) 

Permet de recuperer la partie entiere d'un nombre (troncature 
partie f ractionnaire) . 

FIX (12. 5) donne 12 

FIX (.5) donne 

Pour un nombre X non negatif, FIX(X) = INT(X). 

Par contre , pour un nombre negatif, FIX(X) = INT(X)-1. 

FIX(-3.5) donne -3 

FIX (-.5) donne 

EXP(X) 

Calcule e (base des logarithmes neperiens) a la puissance X. 

EXPU2.5) donne 268337 

EXP (-3. 5) donne .0301974 

EXP (.5) donne 1.64872 

EXP(l) donne 2.71828 

EXP(O) donne 1 

SQR(X) 

Extrait la racine carree de X. 

SQR(12.34) donne 3.51283 

SQR(45) donne 6.70821 

SQR(123456) donne 351.363 

SQR(12E-5) donne .0109545 

C0S(X) 

Retourne le cosinus de X exprime en radians. 

COS(60) donne -.952413 

COS (45) donne .525322 

SIN(X) 

Retourne le sinus de X exprime en radians. 

SIN(45) donne .850902 

SIN(60) donne -.304809 
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TAN(X) 

Retourne la tangente de X exprimee en radians. 

TAN (45) donne 1.61977 

TAN (60) donne .320039 

ATN(X) 

Retourne l'arc tangente de X (c'est a dire l'arc de cercle dont 
la tangente est X) . 

ATN(60) donne .320039 

ATN(12E-5) donne .0109545 

SGN(X) 

Nous donne le signe de X. 

SGN(12) donne 1 (positif) 

SGN(-12) donne -1 (negatif ) 

SGN ( ) donne 



LOG(X) 

Retourne le logarithme naturel (base e) . L'expression X doit etre 

positive. 

LOG(2) donne .693147 

LOG(.5) donne -.693147 

LOG (EXP (1)) donne 1 

NOTE IMPORTANTE : Toutes les fonctions precitees donnent un 
resultat en simple precision. 



Les fonctions de convevs-ion 

CDBL(X) 

Retourne la representation en double precision de l'expression X. 

CDBL(-12) donne -12 

CDBL(-.4) donne -.4000000059604645 

CDBM-12E-9) donne -1 . 200000099 288445D-08 

CINT(X) 

Retourne la representation entiere de l'expression X, dans les 
limites : -32768 <= X < +32767 . 
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CINT(12.6) donne 12 

CINT(12E+3 donne 12000 

CINT(EXP(1)) donne 2 

CSNG(X) 

Retourne la representation en simple precision de la valeur de 
1" expression X. 

CSNG(12E-6) donne 1.2E-05 

CSNG(.2E-2) donne 2E-03 

RND(O) 

Retourne un nombre pseudo-aleatoire compris entre 0.000001 et 

0.999999. 

RND(0) donne .36345 

RND(0) donne .071084 8 

RND(X) 

Retourne un nombre entier pseudo-aleatoire compris entre 1 et la 

valeur de l'expression X. (X) devant etre inferieur a 32768. 

RND(5) donne 4 

RND ( 5 ) donne 2 



Les fonations sur ohatnes de caracteres 

Les chalnes de caracteres manipulees en Basic sont 
essentiellement des chaines alphanumeriques . Le codage utilise 
est celui du standard (norme) ASCII. En annexe, vous trouverez 
un tableau representatif des codes ASCII utilisables avec le 
Basic du TRS-80. 

Rappelons qu'une constante ou une variable de chaine peut avoir 
une longueur de a 255 caracteres. 

ASC(C) 

Retourne la valeur decimale de l'expression de chaine C. 

X=ASC("A") donne 65 dans la variable X 

B2="W" 

X=ASC(B0) donne 87 dans la variable X 
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CHR0(X) 

Retourne, dans une variable de chaine, la valeur de I 1 expression 
numerique X. (Inverse de la fonction ASC) . 

A#=CHR#(65) donne "A" dans la variable A$ 

X=87 

A#=CHR0(X) donne "W" dans la variable A# 

LEN(C) 

Retourne, dans une variable numerique, la longueur de 1' expression 
de chaine C, 

L=LEN ("TRS-80") donne 6 dans la variable L 
A2=" TRS-80 BASIC II" 

L=LEN(A^) donne 15 dans la variable L 

B#="" (chaine vide ou nulle) 

L=LEN(B#) donne dans la variable L 

L=LEN(A#+" RADIO-SHACK") donne 27 dans la variable L 

LEFT$(C,X) 

Prend la partie gauche de 1' expression de chaine C, sur une 
longueur egale a 1' expression numerique X. 

A$= "TRS-80" 

B#=LEFTg'(A#,3) donne "TRS" dans la variable Ag 

N=4 

B^=LEFT^(A0,N) donne "TRS-" dans la variable B# 

C^=LEFT^(A^,N/2) donne "TR" dans la variable C$ 

RIGHT0(C,X)- 

Prend la partie droite de 1' expression de chaine C, sur une 
longueur egale a 1' expression numerique X. 

A2= "TRS-80" 

B0=RIGHT2'(A2',2) donne "80" dans la variable B^ 

N=3 

C0=RIGHT$(A$,N) donne "-80" dans la variable C# 

D0=RIGHT0(A$,N/2) donne "0" dans la variable D# 

Notez ici que 1' expression numerique qui definit la longueur de 
la sous-chaine a extraire est entiere. Ainsi, 3/2 donne 1. 
II en sera de meme pour toutes les autres fonctions sur chalnes 
de caracteres. 
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MID0(C S X1 J X2) 

Extrait une sous-chalne de 1' expression de chaine C. La sous- 
chaine a extraire commence a la position exprimee par XI, et a 
pour longueur celle exprimee par X2 . L' expression numerique XI 
doit absolument etre differente de zero et inferieure a la 
longueur de la chaine + X2 . 

XS=" TRS-80" 

A#=MID#(X#,4,1) donne "-" dans la variable A# 

A^=MID^(X^,1,3) donne "TRS" dans la variable A0 

idem LEFT# 
A#=MIDg(X#,5) donne "80" dans la variable A# 
La longueur n'etant pas specif iee, MID# prend tout le 
reste de la chaine X#, a partir de la position 5. 
D=2 
L=3 
A2=MIDS'(Xg',D,L) donne "RS-" dans la variable A# 

Autre possibilite : 

A^MIDg (LEFTS' (Ag, 4) ,2,2) 

est traitee comme suit : 

1. extraction de la partie gauche de A# : LEFTS' (AS', 4) ="TRS-" 

2. extraction de la sous-chaine "RS" de la chaine "TRS-" ainsi 
equivalent a KIDS' ( "TRS- ", 2,2) soit la sous-chaine "RS". 

Une autre encore : Imbrication des fonctions ! 

XS="LANGAGE BASIC" 
XS=MIDg(MIDS'(Xg',4,4) ,2,2) 

qui retourne dans A0 la sous-chaine "AG" ! ! 

STRING0 (X, C) 

Cree une chaine composee de X caracteres C. 

A^=STRING^(4, "*") donne "****" dans la variable A# 
1=4 

B^STRINGS' ( I , "-") donne " " dans la variable B0 

C2="TRUC" 

B#=STRING# ( 4 , MIDg ( C# , 3 , 1 ) ) 

donne "UUUU" dans la variable B# 

STR0(X) 

Convertit 1' expression numerique X en une chaine decimale ASCII 

X=123 

AS=STR#(X) donne "123" dans la variable A0 
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B#=STR#(12345) donne "12345" dans la variable 

identigue a B#= "12345" 



VAL(C) 

Retourne une valeur numerigue entiere correspondant a la valeur 

numerigue de la chalne C. C'est la fonction inverse de STR#(X). 

donne 123 dans la variable X 



X=VAL("123"^ 

A0="1234" 

Y=VAL(A$) donne 

Z=VAL(MID#(AS,2,2)) donne 

U=vAL(RIGHT#(A#,3)) donne 



1234 dans la variable Y 
23 dans la variable Z 
234 dans la variable U 



LES INSTRUCTIONS DE SAUT ET DE TEST 



GOTO 



(On dit branchement) car elle permet, coirane son nom 1 ' indigue, de 
sauter d'une ligne de programme a une autre ligne de programme. 
Elle est tou jours de la forme GOTO numero de ligne. 



100 




SAUT A LA LIGNE 160 
SAUT A LA LIGNE 100 
SAUT A LA LIGNE 130 



Rien de plus simple gue 1' instruction GOTO ! 

200 GOTO 200 
a votre avis, gue se passe t-il ? 

G0SUB et RETURN (sous-programme) 

Par sous -programme, on entend une sequence d' instructions se 
terminant par 1' instruction RETURN (retour) . 
Cette methode d'ecriture permet d'eviter la duplication de 
sequences d' instructions identigues, ce gui off re l'avantage de 
diminuer 1 ' encombrement memoire du programme . 
Le branchement vers un sous -programme se fait au moyen de 
1' instruction GOSUB, suivi du numero de ligne de la prochaine 
instruction a executer. 

L' instruction RETURN provogue le retour a 1 ' instruction gui suit 
immediatement 1' instruction GOSUB ayant provogue le branchement. 



- 66 



LA PRATIQUE DU TRS- 




SQUS-PRQGRAMME 



Quelques regies relatives aux sous-programmes. 
PROGRAMME PRINCIPAL 



100 GOSUB C000, 
110 




?00 GOSUB (600 



- Avant de rencontrer une instruction RETURN, il faut au prealable 
avoir execute au moins une instruction GOSUB. 

- Un sous-programme peut appeler lui-meme un autre sous-programme 
et ainsi de suite. L'exemple ci-dessus montre que l 1 enchevetrement 
des sous-programmes peut etre parf ois tres complique . 

- II est deconseille de sortir d'un sous -programme autrement que 
par une instruction RETURN. 

- Contrairement aux fonctions que nous avons vues plus haut, les 
sous -programmes en Basic II ne sont, en principe, pas recursifs. 

- Un sous -programme peut avoir plusieurs points d 1 entree, a 
condition, toutefois, qu'il n'y ait pas d'entrave a la regie : 
"pas de RETURN sans GOSUB". 

IF 

Cette instruction permet de faire une comparaison entre deux 
expressions de m§me nature (arithmetiques, chalnes) . 
La forme generale de 1' instruction IF est la suivante : 

IF exp-1 OPERATEUR exp-2 MOT-CLE exp-3 

exp-1 et exp-2 representent les deux elements a comoarer . 
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Par exemple : A(2) avec B(3), Ag avec "OUI" 

OPERATEUR designe le type de comparaison a effectuer parmi les 
operateurs suivants j 

a*************************************** 



# 


OPERATE 


UR ' 


SIGNIFI 


CATION 




* 


= 




EGAL A 






* 


< 




INFER I EUR 


A 




* 


> 




SUPER I EUR 


A 




* 


<= OU 


=< 


INFER I EUR 


OU EGAL 


A 


* 


>= OU 


=> 


: SUPER I EUR 


OU EGAL 


A 


# 


<> OU 


>< 


: DIFFERENT 


DE 





#*************************************** 



MOT-CLE specif ie si exp-3 doit etre execute selon que le resultat 

de la comparaison est vrai ou faux. Deux mots-cles sont autorises 

en Basic II : 

THEN si le resultat est "vrai" 

ELSE si le resultat est "faux" 

Exemples 1) IF A(2) =B(3) THEN... 

2) IF AO 5 ELSE. . . 
en clair 1) executer. . .si A(2) = B(3) 

2) ne pas executer . . .si A<>5, autrement dit : 
executer. .. si A=5 

exp-3 designe, soit une expression a calculer, soit un numero de 
ligne vers laquelle il faut aller pour continuer le programme 
(branchement) , soit une instruction quelconque qui peut etre 
aussi une instruction IF. 



110 
120 



IF A(2) = B(3) THEN GOTO GOO 



SAUT ICI SI A(2) EST EGAL A B«3) 



L' instruction IF est situee a la ligne numero 110 ; si A(2) = 

B(3) , la prochaine instruction a executer se trouve a la ligne 

200 (on execute l'instruction GOTO 200) . 

Si la condition = n'est pas satisfaite, on passe a 1' execution 

de 1' instruction situee a la ligne 120. 

Utilisee sous cette forme, 1* instruction GOTO peut etre omise. 

110 IF A(2) = B(3) THEN 200. 

a le m§me effet. 
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Utilisation des operateurs relationnels dans un instruction IF 

Voila une possibility supplementaire assez interessante. 
Supposons la sequence suivante : 



M10 IF A<2> = B(3) THEN 2nn 

>120 

>130 

>20Q IF A(2) = in THEN 250 

>210 GOTO 120 

>220 

>250 

>_ 



qui consiste a tester A(2) et B(3) = 10. Si c'est vrai, executer 

1' instruction situee a la ligne 250. Si c'est faux, executer 

1' instruction situee a la ligne 120. Pour effectuer ce test, on a 

employe deux instructions IF. 

Avec 1' utilisation d'operateur relationnel, on ecrirait : 

110 IF (A(2) AND B(3)) = 10 THEN 250 
120 



250 



Autre exemple 



110 


IF 


A (2) = 10 


THEN 


200 


120 


IF 


B(3) = 10 


THEN 


200 


130 


3 3 S 


s 3 







200 -.*;,, 

dans lequel on veut executer 1' instruction situSe a la ligne 200 
si A(2) ou B(3) = 10. Avec l'operateur relationnel OR, on ecrirait: 

110 IF (A(2) OR B(3)) = 10 THEN 200 
120 



200 



On peut aussi utiliser dans 1* instruction IF plusieurs operateurs 
relationnels, par exemple : 

110 IF ((A(2) OR B(3)) AND (C(2) OR B(3))) = 10 THEN 200 
ce qui signifie en clair : ex§cuter 1' instruction situee a la 
ligne 200 si A(2) ou B(3) et C(2) ou B(3) = 10. 



- 69 



LA PRATIQUE DU TRS-80 



Resumons-nous dans 1 ' organigramme ci-dessous 



£ 



w = R+y 



],non 



\non ' 



Z=R*2+y/9 



L 



W= R*2 



La variable X ne pouvant prendre que les valeurs 1, 2, 3, la 
sequence d 1 instructions peut §tre la suivante : 

100 IF X < 1 OR X > 3 THEN 140 

110 IF X = 2 THEN 160 

120 Z=R*2+Y/9 

130 GOTO 170 

140 W=R*2 

150 GOTO 170 

160 W=R*Y 

170 ... 



Voyons maintenant 1' utilisation de IF avec des expressions de 
chaines de caracteres . 

Tout d'abord, une definition a retenir : une chaine de caracteres 
A# est inferieure a une chaine de caracteres B# si, dans un 
classement alphabetique, la chaine A# se trouve placee avant la 
chaine B#. 
Exemple : 

"B" < "C" 

"AB" > "AA" 

"TRS-79" < "TRS-80" 

Les symboles ^ (plus petit que) ou^(plus grand que) sont les 

memes que ceux utilises pour les variables numeriques .' 

Exemple : * 

100 IF A$ = "QUI" THEN 200 

100 IF LEFT*(A$j1) = "0" THEN 200 

100 IF MID*(A$?37l) <> "N" THEN 200 

100 IF LEFT*(A$73) = RIGHT$(B$?3) THEN 200 

100 IF A$(I) < LEFT$(B$ 7 LEN(B*)/2) THEN 200 

100 IF A$+"T0T0" = B$ ELSE 200 



Pour tester une chaine vide, on peut programmer : 
100 IF A* = "" THEN 200 



ou encore : 

100 IF LEN(A$) 



THEN 200 
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Dans le premier cas, on compare la variable de chaine &$ avec 
une constante de chaine vide "", dans le deuxieme cas, on teste 
si la longueur de la variable de chaine A0 vaut 0. 

QUELQUES SUBTILITES A PROPOS DE L ' INSTRUCTION TF 

Une forme de test originale : 

100 IF A THEN 200 

effectue un branchement a la ligne 200 si la variable A est 
differente de zero, ce qui evite d'ecrire : 

100 IF A <> THEN 200 

ou encore 

100 IF A =0 ELSE 200 

On peut aussi ecrire : 

100 IF A ELSE 200 

qui signifie aller en 200 si la variable A est nulle. 
Et a propos des operateurs relationnels, si l'on ecrit : 

100 A=10 

110 B=15 

120 C=A<B (l'astuce !) 
C vaut, dans ce cas, - 1 c'est-a-dire que la relation A<B est 
vraie. 
Mais si l'on ecrit : 

120 C=A>B (la meme astuce inversee !) 
C vaudra 0, car la relation A>B est fausse. 
De meme : 

120 C = A<>B (les deux combinees !) 
donne C-l, car la relation est vraie, en effet la variable A est 
bien differente de la variable B. 

La derniere : 

120 C = A = B (attention, par de confusion !) 

C vaudra 0, car la relation A = B est fausse. 

Mefiez-vous, car tous les Basics ne reagissent pas ainsi. 
Par exemple : 

100 A = B = C = 10 
ce qui est tout-a-fait correct dans certains Basics, c' est a dire 
une affectation multiple tres evidente (A=10, B=10, C=10) ; n'est 
pas possible avec Therese. 
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GOTO aaloule 

Dans un exemple pricident, on a effectue 3 tests pour determiner 
trois traitements diffirents (X=l ou 3, X=2 et X<>1,2,3). 
L' instruction GOTO calculi resout plus facilement ce petit 
probleme. Sa representation est la suivante : 

ON exp. GOTO Ll,L2...Ln 

ce qui veut dire } en fonction de la valeur de 1' expression exp. 

executer, soit 1* instruction situee a la ligne LI, soit 

1' instruction situee a la ligne L2 etc... 

Si 1" evaluation de exp. est egale a zero, il n'y a pas de 

branchement, on execute dans ce cas 1* instruction qui suit 

immidiatement le GOTO calculi. 

Avec 1* utilisation de cette instruction, 1' exemple precedent 

s'ecrit : 

100 ON X GOTO 110? 130? 150 

110 W=R*2 

120 GOTO 160 

130 W=R+Y 

140 GOTO 160 

150 W=R*2+Y/9 

160 



Si X vaut 1 on va a la ligne 110, si X vaut 2, on va a la ligne 
130 et si X vaut 3, on va a la ligne 150.' Dans les autres cas 
(X=0 ou X> 3) on continue a la ligne 110 ; tres simple, n'est- 
ce pas ? 

G0SUB oalaule 

De nombreux systemes ne disposent pas de cette possibilite 
interessante au mime titre que le GOTO calculi. Illustrons ce cas 
par 1' exemple ci-dessous : 



T 1 



<£ (2) ^ 



TZ 



>«- 



T2 



Tl 



Tl, T2, T3, reprisentent certains traitement a effectuer selon 
la valeur de la variable X. 
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Cet organ igramme se traduit normalement par la sequence suivante: 



10 


IF X=l THEN 


100 


20 


IF X=2 THEN 


200 


30 


IF X=3 THEN 


100 


40 


IF X=4 THEN 


300 


r2 r50 
L60 










T1 r 100 
Li50 


GOTO 50 




m, r 200 
1 1-250 


'■■ 




GO I 5U * 




r3 r300 
1-350 


GOTO 50 





Traitement repeti deux fois 



Avec utilisation du GOSUB calcule, on §crirait : 



Tl[ 



>00 
>50 
T o fSOO 



ON X GOSUB 100? 200 ? 300 
GOSUB 200 



10 

50 

60 

100 ... 

150 RETURN 



^I^SO RETURN 



350 RETURN 



BOUCLES DE PROGRAMME : les instructions FOR et NEXT 



Dans de nombreux problemes, il est necessaire de repgter 
plusieurs fois une s§rie d* instructions. Considerons le probleme 
suivant : Calcul de la racine carr§e des 10 Elements d'un tableau. 
L* org an igramme correspondant a ce probleme est le suivant : 

I 
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L'organigramme pourra se traiter de la fagon suivante : 

100 DIM A(10) 

110 ... 

120 INITIALISATION DU TABLEAU 

130 ... 

200 1=1 INDICE DE DEPART 

210 IF 1=10 THEN 300 FIN DE CALCUL 

220 A(I )=SSR<A( I) RACINE CARREE DE A<I) DANS A(I) 

230 1 = 1 + 1 PROGRESSION DE LUNDICE 

240 GOTO 210 ITERER 

300 STOP FIN DE CALCUL 



On voit que 1 ' on est conduit a iterer 10 fois la sequence 

d' instructions de la ligne 210 a la ligne 240, puis, les dix 

iterations terminees, aller a la ligne 300. 

Ce genre de probleme est resolu plus aisement avec les instructions 
d' iterations FOR et NEXT. 

La forme generale de l 1 instruction FOR est la suivante : 

FOR var = expl TO exp2 STEP exp3 

var : designe une variable de controle qui correspond a I dans 

l'exemple cite plus haut. 

expl : designe la valeur initiale a affecter a la variable de 

controle (1 dans l'exemple). 

exp2 : designe la valeur finale de la variable de controle, 

valeur qui conditionnera la fin d'execution de la boucle (10 dans 

1' exemple) . 

STEP : est un mot reserve qui definit exp3 comme etant la valeur 

de 1' increment qui viendra s' a j outer a var. 

L' increment exp3 est facultatif, par defaut le pas STEP est egal 

a 1. 

A 1' instruction FOR est tou jours associee une instruction NEXT 
qui a pour but de delimiter la sequence sur laquelle on doit 
iterer . 
La forme de 1 ' instruction NEXT est la suivante : 

NEXT var 
var : designe la variable qui correspond a la variable de 
controle de 1 ' instruction FOR associee. 

Reprenons maintenant l'exemple avec utilisation de ces deux 
instructions : 
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100 DIM AC10) 

110 

120 

150 . . = 

200 FOR 1=1 TO 10 

210 AU ) = SQR ( A( I ) ) 

230 NEXT I 

300 < = = = RETOUR ICI APRES 10 ITERATIONS 



Exemple de calcul des 10 premiers termes de la serie : 
1/1+1/3+1/5+1/7+ . . .+1/19. 

10 SERIE = 

110 FOR I = 1 TO 19 STEP 2 

120 SERIE = SERIE+1/I 

13 NEXT I 

Le meme exemple, mais en procedant a l'envers (utilisation d'un 
pas negatif) : 

100 SERIE = 

110 FOR I = 19 TO 1 STEP -2 

120 SERIE = SERIE+1/I 

130 NEXT I 

Autre exemple : calcul de la moyenne des elements d'un tableau 
de 100 nombres 



100 DIM A(1Q0) 

110 

120 

200 MOYENNE = Initialisation a 

210 FOR I = 1 TO 100 

220 MOYENNE = MOYENNE + AU) Somme des valeurs 

230 NEXT I 

300 MOYENNE = M0YENNE/100 Resultat 



Encore un exemple : calcul de PI a partir de la serie 

(PI+2)/6 

100 S=l 

110 FOR I = 2 TO 40000 

120 X=S+ 1/(1*1) 

130 IF X=S THEN 170 

140 S=X 

150 NEXT I 

160 1=40000 

170 PRINT "I=";l 7 "PI=";S«P<A*Sl 
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Soyez patients, si vous voulez voir le resultat !! 

Regies et remarques elementaires relatives a une boucle 
FOR-NEXT . x 

- L' instruction NEXT doit etre posterieure a 1' instruction FOR 
associee. 

- La variable de controle ne peut Stre une variable indicee. 

- Un branchement de 1'extSrieur d'une boucle FOR-NEXT a 
l l inter ieur d'une boucle est strictement interdit. 

- On peut tou jours quitter une boucle FOR-NEXT avant que la 
variable de controle ait atteint la valeur limite. 

- Lorsque l'on quitte une boucle FOR-NEXT avant que la variable 
de controle ait atteint la valeur limite, la valeur de la 
variable de contrSle est egale a celle qu'el.le avait juste avant 
de quitter la boucle. 

Exemple : 



10 


FOR 1=1 TO 100 


20 




50 


IF T(I) > M(I) THEN 200 


60 


■ • ■ 


100 


NEXT I 


150 


. . . 


200 





Si le test T(I)^M(I) est satisfait lorsque I atteint, par 
exemple, la valeur 63, il y aura un saut a la ligne 200 et la 
valeur de I restera egale § 63. 

- Lorsque l'on quitte une boucle FOR-NEXT par epuisement, la 
valeur de la variable de contrSle correspond a la derniere 
valeur possible, augmentee du pas. 

- Un programme peut contenir plusieurs boucles FOR-NEXT 
imbriquees ou sequentielles, a condition qu'elle ne soient pas 



boucle. JL 



emboitees. 










p*F0R I 


P^FOR 


I 




P^FOR I 


»-*-NEXT I 


r*F0R 


J 




.^FOR J 


|-*F0R J 


L»NEXT 


J 




-►NEXT I 


L^NEXT J 


- ^.NEXT 


I 


__^,NEXT J 


SEQUENTIELLES IMBRIQUEES 


EMBOITEES 


AUT0RIE 


E 




INTERDIT 




i/clt^t 



boucle 5 



touc/e. -i. 
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Un petit conseil au passage : 

Pour ameliorer la lisibilite d'un programme, on peut decaler 
certaines instructions vers la droite, notamment les instructions 
de la portee d'une boucle FOR-NEXT. 



.e : 










100 


A=10 






110 


FOR 


I = 1 TO 100 




120 




FOR J = 1 TO 10 




130 




A(I)=B(J)+A(I) 




140 




NEXT J 




150 


NEXT 


I 
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LES INSTRUCTIONS D ' ENTREE/ SORTIE 



Lors de 1' execution d'un programme, le besoin d'echanges 
d 1 informations entre l'ordinateur et l'utilisateur se fait au 
moyen d 1 instructions appelees : "instructions d'Entrees/Sorties' 
(E/S en abrege) . 



Le terme ENTREE au sens 
Le terme SORTIE au sens 



UTILISATEUR • 
ORDINATEUR ■ 



. ORDINATEUR 
'UTILISATEUR 



Les organes mis en oeuvre par ces instructions sont appeles 
"peripheriques" au sens large du terme, tout simplement parce 
qu'ils se situent a l'exterieur de l'ordinateur, et font partie 
de son environnement. 

Les peripheriques sont souvent limites a un simple clavier de 
machine a ecrire (organe d' entree), d'un organe de sortie, comme 
par exemple un poste de tele, d'un organe E/S comme par exemple 
un magnetophone a cassette capable de lire (entree) ou d' ecrire 
(sortie) des donnees. 



Clavier 
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Generalites sur les instructions d T E/S element aires . 



Ces instructions ont pour nom les mots reserves suivants : 
READ \ 

ou I pour les instructions d' entree 
INPUT J 

PRINT pour 1' instruction de sortie 

Une operation d 1 entree peut etre effectuee a partir : 

- de donnees preparees en memoire dans des lignes numerotees 
(ce sont des donnees statiques) . La lecture de ces donnees se 
fait essentiellement a partir de 1' instruction READ ; 

- de donnees que l'on introduit au cours de 1" execution du 
programme (ce sont des donnees dynamiques) . Dans ce cas, on 
utilisera 1' instruction INPUT. 

Forme des instructions d' entrees. 

READ 

suivi d'une liste de variables simples ou 
ou 



T „„ TTm , d 1 elements de tableaux 
INPUT J 

Exemple : 

10 DIM A(10) ,B#(10) 



50 READ M,W,A(I) ,B#(I) 

Une liste est une suite d l identif icateurs, separes par une 
virgule. Les donnees lues sont effectees aux variables selon 
l'ordre de la liste, mais ne doivent pas se presenter de n 1 importe 
quelle maniere, c'est-a-dire qu'elles doivent etre conformes a la 
nature des variables decrites dans la liste. Ainsi, pour 1 ' exemple 
ci-dessus, la suite de donnees : 

12,125.6,-3, "TRS-80" est correcte 
111, 1 

M W A (I) B0(I) 

Par contre, la suite : 

12, "TRS-80", -3, 125. 6 est incorrecte 

1 A 

M W 

W etant une variable numerique, la donnee presentee etant une 
constante-chaine, une erreur sera detectee par 1 ' instruction READ 
et le programme interrompu . 
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DATA, pour definir les donnees 

Les donnees statigues lues par READ sont definies dans un 
programme par 1' utilisation du mot reserve : DATA, suivi d'une 
liste de valeurs, separes par une virgule. 
Exemple : 

100 DATA 12,-5 

110 DATA "TRS-80" 

120 DATA 8,6,0 

200 READ A 

210 READ B 

220 READ C$ 

230 READ F,J,K 

L' instruction READ A lit la valeur 12 dans la variable A 

L' instruction READ B lit la valeur -5 dans la variable B 

etc. . . 

On s'apergoit gu'apres chague READ, on est pret a lire la donnee 

suivante dans la liste de DATA, de meme gue 1' instruction READ 

situee a la ligne 230 lit 8 dans la variable P, 6 dans la variable 

J et O dans la variable K. 

Mais, si maintenant on execute, par exemple : 

24 READ M 

nous essayons de lire une septieme donnee gui ne figure pas dans 
la liste des DATA. Une anomalie est detectee par 1' instruction 
READ, un message d'erreur est retourne a l'utilisateur et le 
programme sera interrompu. 

RESTORE 

Cette instruction permet de relire les donnees a partir de la 
premiere instruction DATA. 

En effet, chague fois gu'un READ est effectue, on progresse dans 
la liste des donnees, et le seul moyen de retourner au d§but, 
c'est de programmer 1' instruction RESTORE. 
Exemple : 

100 DATA 10,6,5,9,-3 

110 FOR 1=1 TO 5 

120 READ A (I) 

130 NEXT I 

200 RESTORE 
210 GOTO 110 
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L 1 instruction RESTORE peut etre programmee, meme avant que la 
liste de DATA ne soit epuisee, son effet etant de repositionner 
le pointeur READ en debut de la, liste. 

Les donnees statigues peuvent etre situees n'importe ou dans un 
programme, un GOTO sur une instruction DATA etant sans effet, 
dans l'exemple precedent on aurait pu ecrire : 

210 GOTO 100 

Le resultat aurait ete le meme. 

Pour faciliter la lecture "visuelle", et aussi pour ne pas 
ralentir inutilement 1 ' execution d'un programme, il est preferable 
d' ecrire toutes les donnees statiques a la fin du programme. 



INPUT,, definition des donnees 

L 1 instruction INPUT est destinee a lire des donnees en cours 
d' execution du programme. Ce mode d' entree est dit "dynamique" 
ou "conversationnel" . 

La forme generale de 1' instruction INPUT est la suivante : 
INPUT liste de variables 

La liste de variables a la meme structure que pour l 1 instruction 
READ, cependant, INPUT peut s'adresser a un organe d' entree 
determine. 

Le type d 1 organe d 1 entree est precise a droite du mot-cle INPUT. 
L' absence du type de peripherique implique une lecture a partir 
du clavier du TRS-80. 

L' organe d* entree autre que le clavier est defini par le 

caractere^rsuivi de - (tiret) et d'un numero (1 ou 2) si l'entree 

s'effectue a partir d'un lecteur de cassette. 

Exemple : 

INPUT ^-1, Ag, B# 

INPUT#"-2, Bg, M 

et suivi d'un numero (1 a 4) si l'entree s'effectue a partir 

d'un lecteur de mini-disquettes . 

Exemple : 

INPUT #1 A# 
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Exemple d 1 utilisation de INPUT. : initialisation d'un tableau de 
10 elements : 

100 DIM A(10) 

110 FOR 1=1 TO 10 
12 INPUT A (I) 

130 NEXT I 

L' entree est effectuee a partir du clavier du TRS-80, mais, pour 
chaque entree, 1' instruction INPUT affiche sur l'ecran un ? (point 
d' interrogation) qui signifie "je suis pret a recevoir la (ou les) 
donnee(s)". La fin du message est materialisee par l'appui sur la 
touche ENTER. 
Exemple : 

? 1234.56 ENTER 

t t 

affiche par 1' instruction intrcduit par 
INPUT l'utilisateur 

Ce n'est qu'apres l'appui sur la touche ENTER que la donnee 
f rappee au clavier est chargee dans la variable A (I) . 

Dans le cas d'un INPUT sur une liste de variables, par exemple : 

100 DIM A(10) , B(10) 

110 FOR I = 1 TO 10 
120 INPUT A(I) , B(I) 

130 NEXT I 



1' execution donne 



? 1234.56,58 ENTER 



t 

affiche par A ( I ) B ( I 

INPUT 
La presence de la virgule est obligatoire pour separer les deux 
donnees. 

La valeur 1234.56 sera chargee dans A(I) des que la"," sera frappee 
la valeur 58 sera chargee dans B(I) des que la touche ENTER sera 
frappee, de mime que le programme continuera a la ligne 130 etc... 

Comme pour 1 ' instruction READ, la suite de donnees introduites 
a partir d'une instruction INPUT doit etre compatible avec la 
nature des variables decrites dans la liste. 

Une chaine de caracteres peut etre introduite a partir de INPUT. 

Exemple : 

INPUT A£ 

La chaine frappee au clavier, par exemple THERESE, sera introduite 
dans la variable A# : 



- 82 



LA PRATIQUE DU TRS-8 



? THERESE 

mais si la chaine a introduire dans la variable A# doit comporter 

des caracteres speciaux, il faut 1 ' encadrer par deux guillemets. 

Exemple : 

? "12, RUE" 

Ici, le caractere special"," (virgule) fait partie de la chaine et 

n'est pas considers comme separateur de donnees. 

Exemple : 

INPUT Ag,B# 

? 12, RUE 

La variable A# contiendra la chaine "12" 

La variable B0 contiendra la chaine "RUE" 

Rappelons que les guillemets ne font pas partie de la chaine. 

Correction des erreurs de frappe : 4 — 

- par appui sur la touche 4= pour annuler le dernier caractere 
introduit , 

- par appui simultane sur les touches SHIFT f=. pour annuler tout 
le champ frappe. 

Messages d' erreurs : 

- si la donnee introduite est incompatible avec le type 

de la variable qui la recoit, le message REDO est affiche sur 
l'ecran et un nouveau ? indique qu'il faut reintroduire la donnee. 

- si l'on fournit plus de donnees que la liste n'en specif ie, le 
message EXTRAIGNORED est affiche : autrement dit, les donnees 
superflues sont ignorees. 



Autre forme de I ' instruction INPUT 

Apres tout, pourquoi ne pas faire preceder le ? qui est affiche 
par INPUT d'un message en clair ? 

C'est tout-a-fait possible en ecrivant : 

INPUT "AGE" ; AGE 
a 1' execution, on aura sur l'ecran : 

AGE ? 

La donnee f rappee sera introduite dans la variable AGE . On peut 
aussi ecrire : 

INPUT "NOM,PRENOM,AGE" ;NOM, PRE , AGE 
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A 1' execution, on aura : 



NOM,PRENOM,AGE ? TOTO, LOUIS , 18 ENTER 

4, ' * * 

NOM PRE AGE 



L' instruction de sortie PRINT ou LPRINT 

La forme generale de cette instruction est la suivante : 

PRINT liste 

(LPRINT s'adresse a une imprimante, tandis que PRINT s'adresse a 
l'ecran) . 

La liste peut contenir, non seulement des identif icateurs de 
variable et des elements de tableau, mais en plus des expressions 
arithmetiques et des elements de mise en page. 

Les elements sont : 

- les separateurs ; virgule (tabulation) 

point-virgule 

- les chaines de caracteres entre guillemets 

- la fonction TAB qui sert a effectuer des tabulations. 

Exemples : 

PRINT A;"A";B2/I+J; "B2/I+J " 
variable chaine expression cnaine 

PRINT TAB (10) ,"*" 
tabulation colonne 10 et impression d'un x puis retour a la ligne 

- la f onction@ '(A commercial) qui permet d'af richer un texte en 
n'importe quelle position de l'ecran) . 

- la fonction USING qui permet d'editer une donnee se Ion un format 
determine . 

Une instruction PRINT peut s ' ecrire sans parametres . 

Exemple : 

100 PRINT "TOTO" 

110 PRINT 

12 PRINT 

13 PRINT "TITI" 

Les PRINT des lignes 110 et 120 ont pour effet de crSer deux 
interlignes supplementaires entre la ligne ou est imprime TOTO et 
la ligne ou est imprime TITI. 
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La virgule 

Outre sa fonction de separateur de donnees, qu'elle remplit dans 
une liste, la virgule effectue une tabulation a une position 
determinee dans la ligne. 

Lorsqu'une virgule apparalt dans la liste, la donnee qui la 
precede est editee en utilisant une zone de 16 caracteres. 
Ainsi, la ligne d'ecran qui contient 64 caracteres comporte 4 
zones tabulees comme ci-dessous : 

1. . .16. . .32. . .48. . .64 

100 PRINT "A","B","C", "D","E" 
donnera : 

A B C D E 
colonnes 1 16 32 48 64 



Le point-vivgule 

II joue egalement le role de separateur de donnees dans une 
liste, mais, dans ce cas, aucune tabulation n'est effectuee apres 
la donnee qui precede le point-virgule. 

Exemple : 

100 PRINT "A";"B";"C" 
donnera ABC 

Mais, dans le cas suivant : 

100 A=10 
110 B=2 

150 PRINT "A=";A; "B=";B 
donnera A= 10 B=20 

Une donnee numerique est precedee, dans ce cas, par un caractere 
espace, emplacement reserve au signe. 

100 A=-2 
110 PRINT "A="; A 
donne A=-2 

Lorsque la donnee est positive, le signe "+" est omis. II est 
remplace par un espace (ou blanc) . Cette remarque est egalement 
valable dans le cas de la virgule. 
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Lorsqu'un point-virgule apparait a la fin d'une ligne PRINT, 
aucun interligne automatique n'est effectue. 

Exemple : 

100 PRINT "LE "; ) - , , -it • 

> empeche de passer a la ligne suivante 

110 PRINT "TRS-80 "; ) 

120 PRltiT "DE RADIO-SHACK" 

donne pour resultat : 

LE TRS-80 DE RADIO-SHACK 

La fonction TAB 

TAB(exp) peut apparaltre dans une instruction PRINT. Cette 
fonction indique la position du curseur sur l'ecran, (ou de la tete 
d 1 impression sur 1 ' imprimante) ou 1 ' on doit imprimer la donnee. 

Exemples : 

110 PRINT TAB (10) , "A"; 

affichera A en colonne dix de l'ecran 

100 FOR 1=1 TO 10 
110 PRINT TAB (I),"*"; 
12 NEXT I 

donne pour resultat : 

1 10 
TAB ( 1 ) TAB (10) 

Si I n'est pas un entier, TAB (I) est interprete de la meme facon 
que TAB(INT(I)). Cette possibility de tabulation permet d' ameliorer 
la presentation des resultats, de faciliter 1' edition des tableaux, 
de tracer des courbes d'une facon relativement simple. 

La fonction (<3p 

Cette fonction permet d'atteindre n'importe quelle partie de 
l'ecran. Elle est de la forme : 

PRINT (§> exp. 
ou exp. designe une adresse de l'ecran (0 a 1023) . 

donne 1' adresse de la premiere position de la premiere ligne, 
63 celle de la derniere position de la premiere ligne... et 1023 
la derniere position de la derniere ligne. 

Cette fonction ne peut apparaitre qu'une fois dans une ligne 
PRINT, et ce immediatement apres 1' instruction. 
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Exemple : 

PRINT@142,"A" 

affiche la lettre A dans la case 142 de l'ecran. 

Le petit programme suivant permet d'afficher tous les codes 

compris entre 32 et 25 5, par exemple : 

100 FOR I = 32 TO 255 
110 PRINT® I-32;CHR0(I) 
120 NEXT I 
a partir de la case 0. 

La fonetion USING 

Elle permet 1' edition d'une donnee ou d'une liste selon un 
modele d 1 edition determine. 

Le format est le suivant : 

PRINT USING modele; liste 

modele est, soit une constante-chaine (entre guillemets) , soit 
contenu dans une variable de chaine. 

La chaine constituant le modele d 1 edition est composee d'un 
certain nombre de caracteres speciaux : 

h£ . specif ie la position de chaque chiffre. Les positions non 
utilisees a gauche (zeros non signif icatif s) sont remplaces 
par des espaces ; et celles de droite (apres le point 
decimal) par des zeros. 

** . deux asterisques au debut du champ f eront que les positions 
de gauche non signif icatives seront remplacees par des x 

0$ . un caractere # sera imprime devant le premier chiffre 
signif icatif . 

xx^ . insertion de caracteres x dans les positions de gauche non 
signif icatives plus un $ devant le premier caractere 
signif icatif . 

+ . place au debut ou a la fin du champ, permet 1' edition du 
signe (+ ou -) a droite ou a gauche de la donnee, selon 
qu'elle est positive ou negative. 

. (moins) place au debut ou a la fin du champ, permet 

l 1 edition du signe "-" si la donnee est negative. Sinon, 
un espace est insere a la place du signe. 
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% % . specifie le nombre de caracteres qui seront imprimis + 2 
(on compte les %, plus les espaces entre les %) . 

. indigue gu'il faut extraire le premier caractere de la 
chalne. 

Pour illustrer cette fonction, voyons quelques exemples ci- 
dessous : (Lors de l'§criture de ce livre, nous avons essaye ces 
differents exemples. Dans certains cas, la reponse du TRS-80 n'a 
pas ete la reponse attendue, que nous avons indiquee a droite de 
la reponse donnee) : 



10 INPUT "FORMAT" ;F* 
20 INPUT "DONNEE" ?D 
30 PRINT "RESULTAT"; 
40 PRINTUSING F$?D 
^n noTn in 



FORMAT 
DONNEE 
RESULTAT 


## = ## 

12 = 56 
12 = 56 




FORMAT 
DONNEE 
RESULTAT 


## = ## 

123.-56 
M23 = 56 




FORMAT 
DONNEE 
RESULTAT 


## = ## 

1 "7 Ft p, 9 

12 = 5? 




FORMAT 
DONNEE 
RESULTAT 


+##=## 

12 = 56 
+12=56 




FORMAT 
DONNEE 
RESULTAT 


12 = 56 
12=56+ 




FORMAT 
DONNEE 
RESULTAT 


-##=## 
-12=56 
-*-12 =56 


Attendu 
-12.56 


FORMAT 
DONNEE 
RESULTAT 


##=##- 
-12=56 
12=56- 




FORMAT 
DONNEE 
RESULTAT 


. #=##- 
12 = 56 
12 = 56 


Attendu 
%12.56 
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FORMAT 


**## 




DONNEE 


12=13 




RESULTAT 


** 12 




FORMAT 
DONNEE 




Attendu : 


RESULTAT 


•* + P. * 


+3E3K3E 8.00 


FORMAT 


$$##,## 




DONNEE 


12,56 




RESULTAT 


$12,56 




FORMAT 
DONNEE 
RESULTAT 


$$*$, $$+ 

43 = 5 
**44 


Attendu : 
043.50+ 


FORMAT 


<*#7### = ## 




DONNEE 


1234 = 56 




RESULTAT 


$1 ? 234, 56 




FORMAT 


$#>###.-## 




DONNEE 


12,56 ■ 




RESULTAT 


$ 12=56 




FORMAT 


i 




DONNEE 


ABCD 




RESULTAT 


A 




FORMAT 


%% 




DONNEE 


ABCD 




RESULTAT 


AB 




FORMAT 


*r%% 




DONNEE 


ABCDEFG 




RESULTAT 


AB 




FORMAT 


% % 




DONNEE 


ABCDEFGHIJK 




RESULTAT 


ABCDEF 





10 INPUT A$?B*7C$ 

20 PRINTUSING " ! " ;fl$?B* ; Cf 



ABCDjEFGHjIJKL 
RESULTAT 



AEI 



EN REMPLACANT LA LIGNE 20 PAR: 
20 LPRINTUSING " ' ! !";A$?B$;C$ 

AV'EC LES MEMES DONNEES ON OBTIENT 

A E I 
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LES FONCTIONS GRAPHIQUES 

L'ecran du TRS-80 gere.en mode "graphique" comporte 48 lignes 
et 128 colonnes . 
Un point de l'ecran est adresse par ses coordonnees : 

X = N° de colonne a 127 
Y = N° de ligne a 47 

La fonotion SET (x,y) 

Permet "l'allumage" d'un point situe aux coordonnees x, y. 
Exemples : 

100 SET(12,26) 
allume un point situe a 1' intersection de la colonne 12 et de la 
ligne 2 6 ; 

100 SET(RND(128)-1,RND(48)-1) 
allume un point, quelque part dans 1' ecran, x et y etant aliatoires. 

La fonotion RESET (x,y) 

C'est 1' inverse de la precedente, c'est-a-dire qu'elle permet 
1' extinction d'un point. 
Exemple : 

100 CLS 

110 X=10:Y=20 

120 SET(X,Y) allumage 

150 RESET (X,Y) extinction 

La fonotion POINT (x,y) 

Permet de tester l'etat d'un point de l'ecran. Un point est 
soit "allume", soit "eteint". 
Exemple : 

100 SET(20,20) 

110 X = POINT (20, 20) 
retourne la valeur -1 dans la variable X, ce qui correspond au 
point "allume" ; 

120 RESET (20,20) 

130 X=P0INT (20,20) 
retourne la valeur dans la variable X, ce qui correspond au 
point "eteint" . 
On peut ainsi ecrire : 

110 IF POINT (X,Y) THEN 1000 

1000 PRINT "POINT" ; Y, Y; "ALLUME" ; 
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LES FONCTIONS SPECIALES 

Outre les fonctions mathematiques et les fonctions sur chaines 
de caracteres deja abondantes, le Basic II comporte un lot de 
fonctions speciales assez interessantes : 

La fonction CLS 

Efface 1'ecran, et positionne le curseur en haut et a gauche. 

La fonction CLEAR n 

Rend nulles les variables numeriques, et vides les variables de 
chaine et, si n est mentionne, elle reserve un espace de n octets 
pour le stockage des chaines de caracteres. Par defaut n est 
egal a 50. 
Exemple CLEAR 

CLEAR 2 000 

La fonction ERROR code 

Permet de signaler une erreur. 
Exemple : 

100 IF A = THEN ERROR 2 
Si la variable A vaut 0, le message "UE ERROR" sera affiche sur 
1'ecran, et le programme interrompu. 

On peut aussi utiliser le mot-cle ERROR pour "recuperer" une 
erreur aux lieu et place de 1' arret du programme. Ainsi : 
100 ON ERROR GOTO 1000 

200 X=X/0 (erreur volontaire -division par zero-) 

210 

1000 . . . 

Le programme ne sera pas interrompu, et un branchement a la 
ligne 1000 sera effectue. 



La fonction INKEY0 

Qui s'ecrit : A$=INKEY# par exemple. 

permet de ranger dans la variable de chaine A£S un caractere (code 

d'une touche du clavier) lu "a la volee". 

Contrairement a 1' instruction INPUT qui . attend patiemment la 

frappe d'un message terming par ENTER, la fonction INKEY# 

n' effectue aucune attente et ne regoit qu'un seul caractere. 
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Si une touche est enfoncee au moment ou 1 ' instruction est 
executee, le code du caractere correspondant est charge dans la 
variable de chaine (ici AjS) . Si aucune touche n'est enfoncee au 
moment de l 1 execution de la fonction, la variable de chaine sera 
vide (longueur nulle) . 
Exemple : 

10 A2=INKEY# 

2 IF A0="" THEN 10 

3 PRINT A$; 

4 GOTO 10 

Explication : 

Ligne 10 : lecture du clavier et chargement de la variable A# 

Ligne 20 : teste si un caractere a ete lu (A# non vide) 

Si A# est vide, on retourne en 10 pour une nouvelle lecture. 

Ligne 3 : impression du caractere lu. 

Ligne 4 : retour en 10 pour une nouvelle lecture. 

II faut noter que la fonction INKEY# n 1 assure pas l 1 impression 
du caractere introduit au clavier ; la reception est dite 
"transparente", le curseur n'est egalement pas affiche. 

Autre exemple : entree d'un message de 4 caracteres de long et 
affichage de celui-ci : 

100 Mg= " " 

110 C£=INKEY# 

120 IF C0="" THEN 110 

13 M2=M#+C£ 

14 IF LEN(M2")=4 ELSE 110 
150 PRINT M# 

160 GOTO 100 

Explication : 

Ligne 100 : la variable M# est rendue "VIDE". Elle contiendra 
le texte a afficher. 

Ligne 110-120 : acquisition d'un caractere dans la variable C# 

Ligne 130 : le caractere courant (C#) est ajoute (concatenation) 
a la variable M0. 

Ligne 140 : On itere tant que la variable Mg ne contient pas 4 
caracteres. (Pourrait s'ecrire 140 IF LEN(M#)<>4 THEN 110). 

Ligne 150-160 : Impression de la variable tl# et retour en 100. 
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La fonction RESUME numero de ligne 

Elle termine une sequence de traitement d'erreur. Le numero de 
ligne specif ie la ligne de la prochaine instruction a executer. 
Exemple : 

100 ON ERROR GOTO 1000 

200 X=X/0 

210 PRINT "RETOUR/ERREUR" 

1000 PRINT "ERREUR LIGNE", -ERL 
1010 RESUME 210 

La fonction ERL 

Retourne le numero de ligne ou une erreur a ete detectee. Ne 
peut etre exploitee que conjointement avec ON ERROR. 
Exemple : 

100 ON ERROR GOTO 1000 

1000 X=ERL (X contiendra le N° de ligne errone) 
1010 RESUME 100 

La fonction ERR 

Retourne une valeur liee au type de 1' erreur detectee (voir 
liste des codes erreurs en annexe) . 
Exemple : 

100 ON ERROR GOTO 1000 

1000 PRINT "ERR"; ERR/2+1; "LIGNE"; ERL 
1010 RESUME 100 
ou X = ERR valeur de 1' erreur 

X = ERR/2+1 code exact de 1' erreur 

La fonction MEM 

Fournit le nombre d 1 octets inutilis^s (libres) en memoire. 
Exemple : 

X = MEM 

PRINT "IL RESTE"; MEM; "OCTETS EN MEMOIRE" 

La fonction POS (0) 

Retourne une valeur num^rique entiere, indiquant la position 
du curseur. L* argument (0) est une variable fictive. On ecrit : 
X = POS(0) . La variable X contiendra la position courante du 
curseur (0 a 63) 
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L ' instruction STOP 

S' ecrit 100 STOP 

ou 200 IF THEN STOP 

Elle entralne 1' arret du programme apres affichage sur s ' ecran du 
message BREAK AT nnnn, ou nn represente le numero de ligne ou a 
ete rencontree 1' instruction STOP. 

La poursuite de l 1 execution du programme est effectuee apres 
introduction, au clavier, du message CONTinue qui signifie tout 
simplement continuer. 

L ' instruction END 

Elle termine normalement un programme. L' execution de cette 
instruction entralne 1' arret du programme et 1' affichage du 
message READY. 



Les fonctions speciales ci-des sous , St ant etroiternent liees 
avec la programmation en langage assembleur du 1-80, seront 
developpees en detail dans le deuxieme volume. II s'agit de : 

- PEEK : lecture un octet en memoire ; 

- POKE : ecriture un octet en memoire ; 

- DEFUSE : definition de l'adresse d'un sous-programme ecrit en 

langage assembleur ; 

- VARPTR : recuperer l'adresse d'une variable ; 

- USE : appel d'un sous-programme ecrit en langage assembleur 

- INP : entree d'une donnee d'un coupleur d'E/S ; 

- OUT : sortie d'une donnee d'un coupleur d'E/S. 
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TOUCHE EST HORIZONTAL OU VERTICAL? AUQUEL CAS 7 IL FAUDRA INVERSER 
LE SIGNE DE L' INCREMENT DE DEPLACEMENT CORRESPONDANT (1 DEVIENT 
-l? -1 DEVIENT 1? CE QUI EST TOUT SUPPLEMENT REALISE EN 
MULTIPLIANT CET INCREMENT PAR LA VALEUR -1). L' INPACT DE LA BALLE 
EST MATERIALISE VISUELLEMENT (LIGNE 270) ET AUDITIVEMENT (LIGNES 
290 ET 300). CES DEUX DERNIERES COMMANDES VONT EN EFFET EXCITER 
LE 'RELAIS' QUI TELECOMMANDE ORDINAIREMENT LE MOTEUR DU 
MAGNETOPHONE? CE QUI PROVOQUE UN LEGER BRUIT... LE PROGRAMME SE 
POURSUIT ALORS EN LIGNE 190? NON SANS AVOIR PREALABLEMENT EFFACE 
LE MESSAGE "POCI ". 

DANS LE CAS OU LA BALLE N' A PAS ATTEINT L'UN DES BORDS? ELLE EST 
DESSINEE EN LIGNE 130. APRES UNE ATTENTE SUFFISANTE (LIGNE 150)7 
ELLE EST EFFACEE (170) ET LE PROCHAIN DEPLACEMENT EST ALORS 
CALCULE AUX LIGNES 190 ET 200. LE PROGRAMME BOUCLE ALORS SUR LA 
LIGNE 110. 



- 103 



LA PRATIQUE DU TRS-80 



ANNEXE I 

Caracteristiques du BASIC II 



Donnees : 
Entieres 

Simple precision 
Double precision 

Chaine 



-32768 a + 32767 inclus 
-1.701411E+38 a +1 . 701411E+38 inclus 
-1.701411834544556E+38 a 
+1.701411834544556E+38 inclus 
a 255 caracteres 



Numero de ligne : a 65529 inclus 

Longueur d'une ligne de programme : jusgu'a 255 caracteres. 

Occupation memoire : Chague ligne de programme occupe au minimum 
5 octets en memoire, a savoir : 



N° de ligne 
Pointeur ligne 
Retour chariot 



2 octets 

2 octets 

1 octet 

De plus, chague mot reserve, caractere special, operateur etc... 
occupe 1 octet. La place occupee par un nom de variable depend de 
la longueur de ce nom. 

L 1 allocation des variables etant dynamigue, on a : 

Pour un entier : 5 octets (2 pour la valeur, 3 pour le nom de la 

variable. 

Pour une variable simple precision : 7 octets (4 pour la valeur, 

3 pour le nom) . 

Pour une variable double precision : 11 octets (8 pour la valeur, 

3 pour le nom) . 

Pour une variable de chaine : 6 octets minimum (3 pour le nom, 

1 pour la longueur, 2 pour l'adresse de la chaine + l octet par 
caractere de la chaine) . 

Pour les tableaux : 12 octets minimum (3 pour le nom du tableau, 

2 pour la taille, 1 par nombre de dimensions, 2 pour chague 
dimension, et 2, 3, 4 ou 8 (selon le type de tableau) pour chague 
element dans le tableau) . 

Chaque boucle FOR-NEXT : necessite 16 octets supplementaires (en 
dehors du programme) . 

Chaque GOSUB ac.tif : necessite 6 octets (en dehors du programme) . 
Chaque niveau de parentheses dans une expression : necessite 4 
octets plus 12 octets, pour stocker un resultat intermediaire. 
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ANNEXE II 



L-iste des codes evreurs BASIC II 



Code : Abreviation : Signification : 

1 NF NEXT en dehors d'un FOR 

(imbrication boucles) 

2 SN Erreur syntaxe 

3 RG RETURN sans GOSUB 

4 OD Debordement de donnees (chaine) 

5 FC Fonction illegale 

6 OV Debordement operation arithmetique 

7 OM Debordement memoire (plus de place) 

8 UL Numero de ligne non def ini 

9 BS Sous-chaine en dehors des limites 

de la chaine 

10 DD Redimensionnement d'un tableau 

interdit 

11 /0 Division par zero 

12 ID Erreur dans instruction INPUT 

Exemple : INPUT 3 

13 TM Melange de type de donnees 

14 OS Plus d'espace pour les chaines 

15 LS Chaine trop longue ( 255 caracteres) 

16 ST Expression de chaine trop complexe 

17 CN CONTINUE interdit apres END ou EDIT 

18 NR Pas de RESUME 

19 RW Instruction RESUME rencontree avant 

ON ERROR GOTO 

2 UE Erreur non imprimable 

21 MO Melange d' operations 

22 FD Donnee incorrecte 

2 3 L3 Commande reservee au DISK BASIC 
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ANNEXE III 



Mots reserves du BASIC II 







FIX 


OUT 


ABS 




FOR 


PEEK 


AND 




FRE 


POINT 


ASC 


X 


GET 


POKE 


ATN 




GOSUB 


POS 


CDBL 




GOTO 


PRINT 


CHR# 




IF 


X PUT 


CINT 




INKEYS' 


RANDOM 


CLEAR 




INP 


READ 


* CLOSE 




INPUT 


REM 


CLS 


* 


INSTR 


RESET 


X CMD 




INT 


RESTORE 


CONT 


X 


KILL 


RESUME 


COS 




LEFTS' 


RETURN 


CSNG 




LET 


RIGHTS' 


X CVD 


* 


LSET 


RND 


X CVI 




LEN 


X SAVE 


* CVS 


* 


LINE 


SET 


DATA 




LIST 


SGN 


DEFDBL 


* 


LOAD 


SIN 


X DEFFN 


X 


LOC 


SQR 


DEFINT 


X 


LOF 


STEP 


DEFSNG 




LOG 


STOP 


* DEFUSR 




MEM 


STRINGS' 


DEFSTR 


X 


MERGE 


STR$ 


DELETE 


* 


MID# 


TAB 


DIM 


X 


MKDS' 


TAN 


EDIT 


X 


MKI# 


THEN 


ELSE 


X 


MKSg 


X TIMES" 


END 


X 


NAME 


TROFF 


ERL 




NEW 


TRON 


ERR 




NEXT 


USING 


ERROR 




NOT 


USR 


EXP 




ON 


VAL 


X FIELD 


X 


OPEN 


VARPTR 



X Ces mots reserves sont exploites par le Basic DOS. 



- 107 



LA PRATIQUE DU TBS-80 

ANNEXE IV 

Les codes clavier et graphiques 



Une chose n'est pas claire dans les manuels Tandy : II n'y a 
pas de distinction entre les codes generes par le clavier, ceux 
generes par le moniteur, et ceux affectes aux graphismes et aux 
fonctions de la video. 
Nous donnons, ci-apres, les trois tableaux correspondants . 

Codes clavier * NON-SHIFT ** SHIFT * 

* TOUCHE * GRAPH * CODE * CODE ** GRAPH * CODE * CODE * 

* CLAVIER * /ACTION * DECI * HEXA ** /ACTION * DECI * HEXA * 



* 


1 


# 


1 


* 


49 


* 


31 


** 


i 


# 


33 


* 


21 * 


# 


2 


* 


2 


* 


50 


# 


32 


#* 


" 


* 


34 


# 


22 * 


* 


3 


* 


3 


# 


51 


* 


33 


*# 


# 


* 


35 


* 


23 * 


* 


4 


# 


4 


* 


52 


# 


34 


*# 


* 


* 


36 


* 


24 # 


* 


5 


* 


5 


# 


53 


# 


35 


*# 


% 


# 


37 


* 


25 * 


* 


6 


* 


6 


* 


54 


* 


36 


*# 


& 


* 


38 


* 


26 * 


# 


7 


# 


7 


* 


55 


* 


37 


** 


' 


* 


39 


# 


27 * 


* 


8 


# 


Q 


* 


56 


* 


38 


** 


( 


* 


40 


* 


28 * 


* 


9 


# 


9 


* 


57 


# 


39 


*♦ 


) 


* 


41 


# 


29 * 


* 





* 





* 


48 


* 


30 


** 


SPACE 


* 


32 


# 


20 * 


# 




* 


: 


* 


58 


# 


3A 


** 


* 


* 


42 


* 


2A * 


* 


- 


# 


- 


* 


45 


# 


2D 


** 


= 


* 


61 


* 


3D * 


* 


BREAK 


* 




# 


01 


* 


01 


** 




# 


01 


* 


01 * 


* 


♦ 


* 


t 


* 


91 


* 


5B 


** 


CURS t 


* 


27 


# 


IB * 


* 


♦ 


* 


CR + LF 


* 


10 


* 


0A 


*# 


CURS ♦ 


* 


26 


# 


1A * 


# 


•*— 


* 


BACKSP 


* 


08 


* 


08 


*# 


CURS*- 


* 


24 


* 


18 * 


# 


— ► 


# 


TABUL H 


* 


09 


# 


09 


*# 


CURS -+ 


* 


25 


* 


19 * 


* 


CLEAR 


* 




* 


31 


* 


IF 


** 




# 


31 


* 


IF * 


# 


A 


* 


A 


* 


65 


* 


41 


## 


A 


* 


97 


* 


61 * 


* 


B 


* 


B 


* 


66 


* 


42 


** 


B 


* 


98 


# 


62 * 


# 


C 


* 


C 


* 


67 


# 


43 


** 


C 


* 


99 


* 


63 * 


# 


D 


* 


D 


* 


68 


* 


44 


#* 


D 


* 


100 


* 


64 * 


* 


E 


* 


E 


* 


69 


* 


45 


** 


E 


# 


101 


* 


65 * 


# 


F 


* 


F 


* 


70 


* 


46 


** 


F 


* 


102 


* 


66 * 


* 


G 


# 


G 


* 


71 


# 


47 


*# 


G 


* 


103 


# 


67 * 


* 


H 


* 


H 


# 


72 


* 


48 


#* 


H 


* 


104 


* 


68 * 


* 


I 


* 


I 


* 


73 


* 


49 


** 


I 


* 


105 


* 


69 * 


* 


J 


* 


J 


* 


74 


# 


4A 


** 


J 


* 


106 


* 


6A * 


# 


K 


# 


K 


# 


75 


* 


4B 


#* 


K 


* 


107 


* 


6B * 


* 


L 


* 


L 


* 


76 


# 


4C 


#* 


L 


# 


108 


# 


6C * 


* 


M 


* 


M 


* 


77 


# 


4D 


#* 


M 


* 


109 


* 


6D * 


* 


N 


* 


N 


* 


78 


* 


4E 


*# 


N 


* 


110 


* 


6E * 


# 





# 





* 


79 


# 


4F 


** 





* 


111 


# 


6F * 


* 


P 


* 


P 


* 


80 


* 


50 


#* 


P 


# 


112 


* 


70 * 


* 


Q 


# 


Q 


* 


81 


* 


51 


## 


Q 


* 


113 


# 


71 * 


# 


R 


# 


R 


* 


82 


* 


52 


#* 


R 


* 


114 


* 


72 # 


* 


S 


* 


S 


# 


83 


# 


53 


#* 


S 


* 


115 


* 


73 * 


# 


T 


* 


T 


* 


84 


* 


54 


** 


T 


# 


116 


* 


74 * 


* 


U 


* 


U 


* 


85 


# 


55 


*# 


U 


# 


117 


# 


75 * 


* 


V 


* 


V 


* 


86 


* 


56 


## 


V 


# 


118 


# 


76 * 


# 


W 


# 


W 


# 


87 


* 


57 


*# 


w 


* 


119 


* 


77 * 


* 


X 


# 


X 


# 


88 


* 


58 


#* 


X 


* 


120 


* 


78 * 
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Codes clavier (Suite) 



* NON-SHIFT ** SHIFT * 

* TOUCHE * GRAPH * CODE * CODE ** GRAPH # CODE * CODE * 

* CLAVIER * /ACTION * DECI * HEXA ** /ACTION * DECI * HEXA * 

* Y * Y * 39 

* Z * Z * 90 

* 7 * ? #44 

* . * . * 46 

* SPACE * SPACE * 32 

* ; * ; * 59 

* s * a * 64 

* ENTER * CR+LF * 13 

* / * / # 47 * 2F *# ? * 63 * 3F 



59 


** 


Y 


5A 


** 


Z 


2C 


*# 


< 


2E 


*# 


> 


20 


#* 


SPACE 


3B 


#* 


+ 


40 


** 


a 


OD 


** 


CR + LF 



121 


* 


79 


122 


* 


7A 


60 


* 


3C 


62 


# 


3E 


32 


# 


20 


43 


* 


2B 


96 


* 


60 


13 


# 


OD 



Codes fonctions moniteur 



* TOUCHES * ACTION 

* CLAVIER * ET CODES ENGENDRES 

* CLEAR * EFFACEMENT ECRAN 

* * (CODE HOME + EFFACEMENT FIN PAGE) 

* SHIFT ■* * 32 CARACTERES PAR LIGNE 

* SHIFT 3 * PAUSE 

* BREAK * RETOUR A "READY >" 

* SHIFT ■*- * EFFACEMENT LIGNE + RETOUR DEBUT 

* * DE LIGNE 



Codes video engendres par programme (CHR0) 



CODE * CODE * ACTION OU GRAPHISME 
DECI * HEXA * 



14 


# 


OE 


15 


# 


OF 


Tq 


* 


1C 


29 


* 


ID 


30 


* 


IE 


31 


* 


IF 


95 


* 


5F 


23 


* 


17 


92 


* 


5C 


93 


# 


5D 


94 


* 


5E 



CURSEUR PRESENT (ON) 
CURSEUR ABSENT (OFF) 
HOME (DEBUT D' ECRAN) 
CURSEUR EN DEBUT DE LIGNE 
EFFACEMENT FIN DE LIGNE 
EFFACEMENT FIN DE PAGE 
CODE CURSEUR 
MODE 32 CARACTERES PAR LIGNE 
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Les codes graphiques 



Alt LtUdMol) 
10 Ck<x a ) 



I 



Ail 



5o 



I- I 



as$ 



a$o 



Jlto 



I 



A6A 
f\A 



AU 
&F 



I- I 

I- ffl- ¥ I- ffl 

B Alt %W [D-/«o B-/4-/ I] 

■* I" ffl" ffl" I 



A 34 
16 



A32- 
AZJ- 



[|l 4 / J 11' J 



|ir g# g# [# | 

|m |„ |«: f 



« 1- B« I*' I 

Br 1" IT* I 

SAn [Ma?4 Mais CD ak W\ 

B.472 ■-/?? CD>f*o W\A8A \M 

BZ ffl B3 E M E £5 I 

[^ |# jir ]i? | 

H^/w B^ y|^9o ■ 

ac ■ bj> m &e ■ 



?£• 
-447- 

-45z. 
9# 

A6Z 
AZ. 

A6? 

A1Z 
Ac 

All 
BA 

AtZ 
BC 



At* 
65 



Nota 



Ves zones noires et blanches sont inversees suv I'ecvan. 
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ANNEXE V 



Problemes de magnetophone 



Les problemes rencontres au sujet du magnetophone a cassettes 
sont si frequents que nous ne pouvions moins faire que de leur 
consacrer au moins une annexe. 

Pour ce faire, et afin d'eviter une entree prematuree dans 
l'asile psychiatrique le plus proche, il est bon d ' adopter une 
certaine methodologie. 

Voici la marche a suivre pour verifier le reglage de votre 
lecteur/enregistreur de cassettes (nous supposerons correct le 
branchement des 3 cables relies a cet appareil) . 

Ecrire tout d'abord un petit programme de quelques lignes. 
Par exemple : 

10 CLS 

2 PRINT "LE MAMA...LE MAGNET ... LE MAGNETOPHONE" 

30 PRINT "MAIS C'EST TRES SIMPLE...!" 

Mettre ensuite une cassette dans 1' appareil, en veillant a ce 
que la jonction amorce/bande magnetique soit placee au debut de 
la cassette, approximativement face a la tete d'ecriture. 

Appuyez ensuite sur la touche rouge "RECORD" du magnetophone et , 
en maintenant cet appui, pressez la touche "PLAY". 

Lachez ensuite les deux touches, qui doivent alors rester dans 
leur position. La cassette ne doit pas encore avanoev. 

Reglez maintenant le volume a la valeur 6. Si vous avez un 
controle de tonalite, il doit etre sur les aigus (HIGH) . En fait, 
ces deux dernieres instructions ne sont pas utiles durant la phase 
d'ecriture, mais mieux vaut le faire tout de suite. 

Frappez ensuite au clavier du TRS-80 la commande d'ecriture du 
programme, suivie de la touche Enter : 

CSAVE"A" 
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Des ce moment, la cassette doit commencer a tourner, et le 
programme est suppose s'y inscrire. Lorsgue la cassette s ' arrete, 
le message READY doit Stre affiche sur l'ecran. 

Rebobinez alors la cassette, en pressant d'abord la touche 
STOP du magnetophone afin de faire remonter les deux touches 
enfoncees precedemment, puis la touche Rewind (rebobinage) . La 
cassette doit alors tourner jusqu'a sa butee. Si ce n'est pas le 
cas, debranchez le cordon "Remote" du magnetophone (ancien modele 
seulement) . 

Pressez ensuite la touche "Play" de l'appareil, et frappez au 
clavier : 

CLOAD? (suivi de la touche "Enter") 

La cassette doit alors commencer a tourner et, quelques secondes 
apres, deux caracteres asterisgues (xx) doivent apparaitre dans 
le coin haut droit de l'ecran. Cela indique que le debut du 
programme a ete reconnu par 1 ' ordinateur (ce n'est que le debut) . 

Si vous n'avez pas cette indication, inutile d'aller plus loin. 
Pressez le bouton "RESET" situe a l'arriere du clavier, retouchez 
legerement le volume, et retournez au rebobinage. 

Apres plusieurs tentatives infructueuses, faites un nouvel essai 
d'ecriture, car, en fait, l'erreur a pu se produire a ce moment- 
la. Eventuellement, changez de cassette, la votre peut avoir un 
def aut. 

Si, contre toute attente, l'un des asterisques s'est mis a 
clignoter, c'est bon signe : le programme est bien lu, et compare 
avec son frere jumeau tou jours en memoire . Si tout se passe bien, 
le message READY ne doit pas tarder a apparaitre sur l'ecran. 

Lorsqu'une erreur de comparaison est detectee, le message 'BAD' 
est affiche. Deux causes sont possibles : le programme a ete mal 
ecrit et, pour en avoir le coeur net, il faut tout recommencer ; 
ou bien il a ete mal lu. Dans ce dernier cas, il faut retoucher 
legerement le volume (essayez lentement et systematiquement toutes 
les positions) , et relire le programme. 
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QUELQUES CONSEILS SUPPLEMENT AIRES : 

Lorsque vous lisez un programme par la commande CLOAD, prenez 
1' habitude de faire suivre cette lecture d'une liste (LIST) afin 
de voir ce qui a ete lu. En effet, il n'y a pas de controle de 
validite des informations avec cette commande. Dans le cas ou une 
erreur s'est manifestee, il est bien rare que tout le reste du 
programme n'ait pas ete "decale" . Dans ce cas, l'ecran doit 
afficher un tas de choses incoherentes, et il faut refaire une 
lecture en retouchant legerement le reglage de volume, en plus ou 
en moins . 

Assurez-vous tou jours, dans le cas ou vous avez plusieurs 
programmes sur la meme bande, de tou jours commencer la lecture en 
debut de programme (et non pas au milieu, meme s'il s'agit d'un 
programme devant etre saute) . 

Normalement, lorsque vous avez determine la position correcte 
du reglage de volume, il ne faut plus y toucher. Toutef ois , 
certains programmes du commerce demandent un reglage different. 
Dans ce cas, remettez 1 ' ancienne graduation, des que la lecture 
est terminee. 



115 - 



LA PRATIQUE DU TRS-80 



ANNEXE VI 

Le BASIC niveau I 



Liste des instructions du Basic niveau I 

PRINT 

Imprime les valeurs de variables et d' expressions, ainsi que tout 

texte entre guillemets. 

Exemple : 

10 PRINT "A+B";A+B 

INPUT 

Coiranande a l'ordinateur de s'arreter et d'attendre que vous 

entriez des donnees au clavier. 

Exemple : 

10 INPUT A,B,C 

Peut aussi imprimer un texte avant de s'arreter. 
Exemple : 

20 INPUT "ENTREZ PRIX";P 

READ 

Lit des valeurs contenues dans des instructions DATA 

Exemple : 

30 READ A,B,C,A# 

DATA 

Contient des donnees qui pourront etre lues par des READ. 

Exemple : 

40 DATA 7,2,3, "BOULON" 

RESTORE 

Commande a la prochaine instruction READ de recommencer a partir 

de la premiere ligne DATA. 

Exemple : 

50 RESTORE 

LET 

Affecte une nouvelle valeur a la variable apparaissant a gauche 

du signe = (facultatif ) . 
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Exemple : 

60 LET P=3. 14159 

GOTO 

L' execution se poursuit automat iquement a la ligne specif iee. 

Exemple : 

10 GOTO 150 

IF-THEN 

Correspond a un GOTO soumis a une condition. 

Exemple : 

80 IF A=B THEN 60 

IF 

Forme plus generale : si la condition est vraie, les instructions 

de la ligne sont executees. 

Exemple : 

90 IF C=l A=A+l:GOTO 10 

FOR-NEXT 

Definit une boucle qui doit etre executee un nombre determine de 

fois . 

Exemple : 

10 FOR 1=1 TO 15 

20 NEXT I 

STEP 

Specif ie la valeur de 1 ' increment dans une boucle FOR-NEXT . 

Exemple : 

30 FOR J=l TO 50 STEP K 

STOP 

Arrete 1' execution du programme et affiche le message BREAK AT 

### 

Exemple : 

40 IF A=B STOP 

END 

Arrete def initivement 1' execution du programme. 

Exemple : 

50 END 
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GOSUB 

Commande 1' execution de ' la sous-routine commengant a la ligne 

specif iee . 

Exemple : 

60 GOSUB 1000 

RETURN 

Termine 1' execution de la sous-routine ; 1 ' execution reprend a 

1' instruction qui suit le GOSUB. 

Exemple : 

10 RETURN 

ON 

Branchement a plusieurs voies dans un GOTO ou un GOSUB. 

Exemple : 

80 ON N GOTO 30,40,50 

90 ON M GOSUB 100,200,300 



Parametres d' -impress -ion 

AT 

Specif ie apres PRINT, commence 1' impression a la position 

indiquee de l'ecran. 

Exemple : 

10 PRINT AT 650,"SALUT" 

20 PRINT AT X+1,A 

TAB 

Specif ie apres PRINT, fait ecrire la valeur qui suit apres le 
nombre indique de positions, depuis le debut de la ligne. 
Exemple : 

30 PRINT TAB (5) ;A; 

TAB (I) ;B 



Instructions graphiques 

SET 

Allume le segment specif ie sur l'ecran. 

Exemple : 

10 SET(45,I+1) 
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RESET 

Eteint le segment specif ie sur l'ecran. 

Exemple : 

20 RESET (X,Y) 

POINT 

Prend la valeur 1 si le segment specif ie est allume sur l'ecran, 

et prend la valeur sinon. 

Exemple : 

30 IF POINT (X,Y)=1 THEN PRINT "ALLUME" 

CIS 

Efface completement l'ecran. 

Exemple : 

40 CLS 



Liste des aommandes du Basic niveau I 

NEW 

Efface toutes les lignes de programme dans la memoire . 

Exemple : 

NEW 

RUN 

Commande 1' execution du programme a partir de la ligne de numero 

le plus petit. 

Exemple : 

RUN 

RUN&&& 

Commande 1' execution du programme a partir de la ligne specif iee, 

Exemple : 

RUN 300 

LIST 

Affiche les douze premieres lignes du programme qui est en 

memoire, a partir du numero le plus petit ; pour afficher les 

lignes suivantes, utilisez la touched. 

Exemple : 

LIST 
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LISTfrfrfr 

Meme fonction que LIST, mais a partir de la ligne specif iee. 

Exemple : 

LIST 355 

CONT 

Commande la poursuite de 1 ' execution du programme lorsque l'ecran 

indique BREAK AT^&jfc. 

Exemple : 

CONT 



Remarque concevnant aes cornmandes : Elles ne peuvent pas etre 
incluses dans un programme. 
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ANNEXE VII 

Conversions hexadecimal- decimal 
Methode et tables 



Conversion hexadecimal-decimal 



Convertir 1F8A en decimal. En lisant de gauche a droite on obtient 

1F8A 16 

-A,. 



— 1, 



10,6° 


= 


A ,6 


= 


10 ,o 


K 


= 


80, 6 


= 


12 8, 


K 


= 


F00 ,« 


= 


3840, 


K 


= 


iooo 16 


= 


4096, 



IF8A,, 



8074, 



Conversion decimal-hexadecimal 



Convertir 40 003,, en hexadecimal. Dans la table on trouve 



36 864 io 


= 


9 „ 


X 


K 


= 


9000 16 


et 


1 reste 


3139 


3 072 ]0 


= 


C , 6 


X 


K 


= 


C00 ,<s 


et 


1 reste 


67 


",o 


= 


4 ,6 


X 


K 


= 


40 ,< 


et 


1 reste 


3 , 


3,o 




3 , 6 


X 


io,: 




\ 


et 


1 reste 





40 003,„ 


9C43, 





Hexade 
1 


:imal x 10' 


xI0f t 


*'°? 6 


x 10< 6 


* ] K 


x 10* 6 


*'0,'a 


xl0° 


268 435 456 


16 777 216 


1 048 576 


65 536 


4 096 


256 


16 


1 


2 


536 870 912 


33 554 432 


2 097 152 


131 072 


8 192 


512 


32 


2 


3 


805 305 368 


50 331 648 


3 145 728 


1 96 608 


12 288 


768 


48 


3 


4 


1 073 741 824 


67 108 864 


4 1 94 304 


262 144 


16 384 


1 024 


64 


4 


5 


1 342 177 280 


83 886 080 


5 242 880 


327 680 


20 480 


1 280 


80 


5 


6 


1 610 612 736 


100 663 296 


6 291 456 


393 216 


24 576 


1 536 


96 


6 


7 


1 879 048 1 92 


117 440 512 


7 340 032 


458 752 


28 672 


1 792 


112 


7 


8 


2 147 483 648 


134 217 728 


8 388 608 


524 288 


32 768 


2 048 


128 


8 


9 


2 415 919 104 


1 50 994 944 


9 437 184 


589 824 


36 864 


2 304 


144 


9 


A 


2 684 354 560 


167 772 160 


1 485 760 


655 360 


40 960 


2 560 


160 


10 


B 


2 952 790 016 


184 549 376 


11 534 336 


720 896 


45 056 


2 816 


176 


11 


C 


3 221 225 472 


201 326 592 


12 582 912 


786 432 


49 152 


3 072 


192 


12 


D 


3 489 660 928 


218 103 808 


13 631 488 


851 968 


53 248 


3 328 


208 


13 


E 


3 758 096 384 


234 881 024 


14 680 064 


91 7 504 


57 344 


3 584 


224 


14 


F 


4 026 531 840 


251 658 240 


1 5 728 640 


983 040 


61 440 


3 840 


240 


15 



* Ces documents sont reproduits avec 1'aimable autori.sation de lc 
Compagnie CII HONEYWELL BULL. 



- 121 



LA PRATIQUE DU TRS-80 



Arithmetique hexadecimale 



Table d' addition 






1 2 3 


4 5 6 


7 8 9 


A 


B 


C 


D E F 


1 


02 03 04 


05 06 07 


08 09 OA 


OB 


OC OD 


OE OF 10 


2 


03 04 05 


06 07 08 


09 OA OB 


OC OD 


OE 


OF 10 11 


3 


04 05 06 


07 08 09 


OA OB OC 


OD 


OE 


OF 


10 11 12 


4 


05 06 07 


08 09 OA 


OB OC OD 


OE 


OF 


10 


11 12 13 


5 


06 07 08 


09 OA OB 


OC OD OE 


OF 


10 


11 


12 13 14 


6 


07 08 09 


OA OB OC 


OD OE OF 


10 


11 


12 


13 14 15 


7 


08 09 0A 


OB OC OD 


OE OF 10 


11 


12 


13 


14 15 16 


8 


09 OA OB 


OC OD OE 


OF 10 11 


12 


13 


14 


15 16 17 


9 


OA OB OC 


OD OE OF 


10 11 12 


13 


14 


15 


16 17 18 


A 


OB OC OD 


OE OF 10 


11 12 13 


. 14 


15 


16 


17 18 19 


B 


OC OD OE 


OF 10 11 


12 13 14 


15 


16 


17 


18 19 1A 


C 


OD OE OF 


10 11 12 


13 14 15 


16 


17 


18 


19 1A IB 


D 


OE OF 10 


11 12 13 


14 15 16 


17 


18 


19 


1A IB 1C 


E 


OF 10 11 


12 13 14 


15 16 17 


18 


19 


1A 


IB 1C ID 


F 


10 11 12 


13 14 15 


16 17 18 


19 


1A 


IB 


1C ID IE 



Table de multiplication 



1 


2 


3 


4 5 6 


7 8 


9 


ABC 


D E F 


2 


04 


06 


08 OA OC 


OE 10 


12 


14 16 18 


1A 1C IE 


3 


06 


09 


OC OF 12 


15 18 


IB 


IE 21 24 


27 2A 2D 


4 


08 


OC 


10 14 18 


1C 20 


24 


28 2C 30 


34 38 3C 


5 


OA 


OF 


14 19 IE 


23 28 


2D 


32 37 3C 


41 46 4B 


6 


OC 


12 


18 IE 24 


2A 30 


36 


3C 42 48 


4E 54 5A 


7 


OE 


15 


1 C 23 2A 


31 38 


3F 


46 4D" 54 


5B 62 69 


8 


10 


18 


20 28 30 


38 40 


48 


50 58 60 


68 70 78 


9 


12 


IB 


24 2D 36 


3F 48 


51 


5A 63 6C 


75 7E 87 


A 


14 


IE 


28 32 3C 


46 50 


5A 


64 6E 78 


82 8C 96 


B 


16 


21 


2C 37 42 


4D 58 


63 


6E 79 84 


8F 9A A5 


C 


18 


24 • 


30 3C 48 


54 60 


6C 


78 84 90 


9C A8 B4 


D 


1A 


27 


34 41 4E 


5B 68 


75 


82 8F 9C 


A9 B6 C3 


E 


1C 


2A 


38 46 54 


62 70 


7E 


8C 9A A8 


B6 C4 D2 


F 


IE 


2D 


3C 4B 5A 


69 78 


87 


96 A5 B4 


C3 D2 El 
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Conversion hexedecimal-decimal de nombres entiers 



La table situee pages suivantes permet d'effectuer des convertions 
enlre : 

- les entiers hexad6cimaux compris entre et FFF d'une part, et 

- les entiers d6cimaux compris entre et 4095 d'autre part. 



Pour convertir des entiers plus grands, les valeurs trouv^es dans la 
table doivent etre ajout£es aux nombres du tableau ci-dessous. 



Hexadecimal 


Decimal 


01 000 


4 096 


02 000 


8 192 


03 000 


12 288 


04 000 


16 384 


05 000 


20 480 


06 000 


24 576 


07 000 


28 672 


08 000 


32 768 


09 000 


36 864 


OAO00 


40 960 


0B 000 


45 056 


ocooo 


49 152 


0D000 


53 248 


0E 000 


57 344 


OF 000 


61 440 


10 000 


65 536 


11 000 


69 632 


12 000 


73 728 


13 000 


77 824 


14 000 


81 920 


15 000 


86 016 


16 000 


90 112 


17 000 


94 208 


18 000 


98 304 


19 000 


1 02 400 


1A000 


1 06 496 


IB 000 


110 592 


1C000 


114 688 


ID 000 


118 784 


IE 000 


122 880 


IF 000 


1 26 976 



Hexadecimal 


Decimal 


20 000 


131 072 


30 000 


1 96 608 


40 000 


262 144 


50 000 


327 680 


60 000 


393 216 


70 000 


458 752 


80 000 


524 288 


90 000 


589 824 


A0 000 


655 360 


B0 000 


720 896 


CO 000 


786 432 


DO 000 


851 968 


EO 000 


91 7 504 


FO 000 


983 040 


1 00 000 


1 048 576 


200 000 


2 097 1 52 


300 000 


3 145 728 


400 000 


4 1 94 304 


500 000 


5 242 880 


600 000 


6 291 456 


700 0Q0 


7 340 032 


800 000 


8 388 608 


900 000 


9 437 184 


A00 000 


1 485 760 


BOO 000 


11 534 336 


COO 000 


12 582 912 


D00 000 


13 631 488 


E00 000 


14 680 064 


F00 000 


1 5 728 640 


1 000 000 


16 777 216 


2 000 000 


33 554 432 
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1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


000 


0000 


0001 


0002 


0003 


0004 


0005 


0006 


0007 


0008 


0009 


0010 


0011 


0012 


0013 


0014 


0015 


010 


0016 


0017 


0018 


0019 


0020 


0021 


0022 


0023 


0024 


0025 


0026 


0027 


0028 


0029 


0030 


0031 


020 


0032 


0033 


0034 


0035 


0036 


0037 


0038 


0039 


0040 


0041 


0042 


0043 


0044 


0045 


0046 


0047 


030 


0048 


0049 


0050 


0051 


0052 


0053 


0054 


0055 


0056 


0057 


0058 


0059 


0060 


0061 


0062 


0063 


040 


0064 


0065 


0066 


0067 


0068 


0069 


0070 


0071 


0072 


0073 


0074 


0075 


0076 


0077 


0078 


0079 


050 


0080 


0081 


0082 


0083 


0084 


0085 


0086 


0087 


0088 


0089 


0090 


0091 


0092 


0093 


0094 


0095 


060 


0096 


0097 


0098 


0099 


0100 


0101 


0102 


0103 


0104 


0105 


0106 


0107 


0108 


0109 


0110 


0111 


070 


0112 


0113 


0114 


0115 


0116 


0117 


0118 


0119 


0120 


0121 


0122 


0123 


0124 


0125 


0126 


0127 


080 


0128 


0129 


0130 


0131 


0132 


0133 


0134 


0135 


0136 


0137 


0138 


0139 


0140 


0141 


0142 


0143 


090 


0144 


0145 


0146 


0147 


0148 


0149 


0150 


0151 


0152 


0153 


0154 


0155 


0156 


0157 


0158 


0159 


0A0 


0160 


0161 


0162 


0163 


0164 


0165 


0166 


0167 


0168 


0169 


0170 


0171 


0172 


0173 


0174 


0175 


OBO 


0176 


0177 


0178 


0179 


0180 


0181 


0182 


0183 


0184 


0185 


0186 


0187 


0188 


0189 


0190 


0191 


OCO 


0192 


0193 


0194 


0195 


0196 


0197 


0199 


0198 


0200 


0201 


0202 


0203 


0204 


0205 


0206 


0207 


ODO 


0208 


0209 


0210 


0211 


0212 


0213 


0215 


0214 


0216 


0217 


0218 


0219 


0220 


0221 


0222 


0223 


OEO 


0224 


0225 


0226 


0227 


0228 


0229 


0231 


0230 


0232 


0233 


0234 


0235 


0236 


0237 


0238 


0239 


OFO 
100 


0240 


0241 


0242 


0243 


0244 


0245 


0247 


0246 


0248 


0249 


0250 


0251 


0252 


0253 


0254 


0255 


0256 


0257 


0258 


0259 


0260 


0261 


0262 


0263 


0264 


0265 


0266 


0267 


0268 


0269 


0270 


0271 


no 


0272 


0273 


0274 


0275 


0276 


0277 


0278 


0279 


0280 


0281 


0282 


0283 


0284 


0285 


0286 


0287 


120 


0288 


0289 


0290 


0291 


0292 


0293 


0294 


0295 


0296 


0297 


0298 


0299 


0300 


0301 


0302 


0303 


130 


0304 


0305 


0306 


0307 


0308 


0309 


0310 


0311 


0312 


0313 


0314 


0315 


0316 


0317 


0318 


0319 


140 


0320 


0321 


0322 


0323 


0324 


0325 


0326 


0327 


0328 


0329 


0330 


0331 


0332 


0333 


0334 


0335 


150 


0336 


0337 


0338 


0339 


0340 


0341 


0342 


0343 


0344 


0345 


0346 


0347 


0348 


0349 


0350 


0351 


160 


0352 


0353 


0354 


0355 


0356 


0357 


0358 


0359 


0360 


0361 


0362 


0363 


0364 


0365 


0366 


0367 


170 


0368 


0369 


0370 


0371 


0372 


0373 


0374 


0375 


0376 


0377 


0378 


0379 


0380 


0381 


0382 


0383 


180 


0384 


0385 


0386 


0387 


0388 


0389 


0390 


0391 


0392 


0393 


0394 


0395 


0396 


0397 


0398 


0399 


190 


0400 


0401 


0402 


0403 


0404 


0405 


0406 


0407 


0408 


0409 


0410 


0411 


0412 


0413 


0414 


0415 


1A0 


0416 


0417 


0418 


0419 


0420 


0421 


0422 


0423 


0424 


0425 


0426 


0427 


0428 


0429 


0430 


0431 


1B0 


0432 


0433 


0434 


0435 


0436 


0437 


0438 


0439 


0440 


0441 


0442 


0443 


0444 


0445 


0446 


0447 


ICO 


0448 


0449 


0450 


0451 


0452 


0453 


0454 


0455 


0456 


0457 


0458 


0459 


0460 


0461 


0462 


0463 


1D0 


0464 


0465 


0466 


0467 


0468 


0469 


0470 


0471 


0472 


0473 


0474 


0475 


0476 


0477 


0478 


0479 


1E0 


0480 


0481 


0482 


0483 


0484 


0485 


0486 


0487 


0488 


0489 


0490 


0491 


0492 


0493 


0494 


0495 


1F0 
200 


0496 


0497 


0498 


0499 


0500 


0501 


0502 


0503 


0504 


0505 


0506 


0507 


0508 


0509 


0510 


0511 


0512 


0513 


0514 


0515 


0516 


0517 


0518 


0519 


0520 


0521 


0522 


0523 


0524 


0525 


0526 


0527 


210 


0528 


0529 


0530 


0531 


0532 


0533 


0534 


0535 


0536 


0537 


0538 


0539 


0540 


0541 


0542 


0543 


220 


0544 


0545 


0546 


0547 


0548 


0549 


0550 


0551 


0552 


0553 


0554 


0555 


0556 


0557 


0558 


0559 


230 


0560 


0561 


0562 


0563 


0564 


0565 


0566 


0567 


0568 


0569 


0570 


0571 


0572 


0573 


0574 


0575 


240 


0576 


0577 


0578 


0579 


0580 


0581 


0582 


0583 


0584 


0585 


0586 


0587 


0588 


0589 


0590 


0591 


250 


0592 


0593 


0594 


0595 


0596 


0597 


0598 


0599 


0600 


0601 


0602 


0603 


0604 


0605 


0606 


0607 


260 


0608 


0609 


0610 


0611 


0612 


0613 


0614 


0615 


0616 


0617 


0618 


0619 


0620 


0621 


0622 


0623 


270 


0624 


0625 


0626 


0627 


0628 


0629 


0630 


0631 


0632 


0633 


0634 


0635 


0636 


0637 


0638 


0639 


280 


0640 


0641 


0642 


0643 


0644 


0645 


0646 


0647 


0648 


0649 


0650 


0651 


0652 


0653 


0654 


0655 


290 


0656 


0657 


0658 


0659 


0660 


0661 


0662 


0663 


0664 


0665 


0666 


0667 


0668 


0669 


0670 


0671 


2A0 


0672 


0673 


0674 


0675 


0676 


0677 


0678 


0679 


0680 


0681 


0682 


0683 


0684 


0685 


0686 


0687 


2 BO 


0688 


0689 


0690 


0691 


0692 


0693 


0694 


0695 


0696 


0697 


0698 


0699 


0700 


0701 


0702 


0703 


2C0 


0704 


0705 


0706 


0707 


0708 


0709 


0710 


0711 


0712 


0713 


0714 


0715 


0716 


0717 


0718 


0719 


2 DO 


0720 


0721 


0722 


0723 


0724 


0725 


0726 


0727 


0728 


0729 


0730 


0731 


0732 


0733 


0734 


0735 


2E0 


0736 


0737 


0738 


0739 


0740 


0741 


0742 


0743 


0744 


0745 


0746 


0747 


0748 


0749 


0750 


0751 


2F0 
300 


0752 


0753 


0754 


0755 


0756 


0757 


0758 


0759 


0760 


0761 


0762 


0763 


0764 


0765 


0766 


0767 


0768 


0769 


0770 


0771 


0772 


0773 


0774 


0775 


0776 


0777 


0778 


0779 


0780 


0781 


0782 


0783 


310 


0784 


0785 


0786 


0787 


0788 


0789 


0790 


0791 


0792 


0793 


0794 


0795 


0796 


0797 


0798 


0799 


320 


0800 


0801 


0802 


0803 


0804 


0805 


0806 


0807 


0808 


0809 


0810 


0811 


0812 


0813 


0814 


0815 


330 


' 0816 


0817 


0818 


0819 


0820 


0821 


0822 


0823 


0824 


0825 


0826 


0827 


0828 


0829 


0830 


0831 


340 


0832 


0833 


0834 


0835 


0836 


0837 


0838 


0839 


0840 


0841 


0842 


0843 


0844 


0845 


0846 


0847 


350 


0848 


0849 


0850 


0851 


0852 


0853 


0854 


0855 


0856 


0857 


0858 


0859 


0860 


0861 


0862 


0863 


360 


0864 


0865 


0866 


0867 


0868 


0869 


0870 


0871 


0872 


0873 


0874 


0875 


0876 


0877 


0878 


0879 


370 


0880 


0881 


0882 


0883 


0884 


0885 


0886 


0887 


0888 


0889 


0890 


0891 


0892 


0893 


0894 


0895 


380 


0896 


0897 


0898 


0899 


0900 


0901 


0902 


0903 


0904 


0905 


0906 


0907 


0908 


0909 


0910 


0911 


390 


0912 


0913 


0914 


0915 


0916 


0917 


0918 


0919 


0920 


0921 


0922 


0923 


0924 


0925 


0926 


0927 


3A0 


0928 


0929 


0930 


0931 


0932 


0933 


0934 


0935 


0936 


0937 


0938 


0939 


0940 


0941 


0942 


0943 


3B0 


0944 


0945 


0946 


0947 


0948 


0949 


0950 


0951 


0952 


0953 


0954 


0955 


0956 


0957 


0958 


0959 


3C0 


0960 


0961 


0962 


0963 


0964 


0965 


0966 


0967 


0968 


0969 


0970 


0971 


0972 


0973 


0974 


0975 


3 DO 


0976 


0977 


0978 


0979 


0980 


0981 


0982 


0983 


0984 


0985 


0986 


0987 


0988 


0989 


0990 


0991 


3E0 


0992 


0993 


0994 


0995 


0996 


0997 


0998 


0999 


1000 


1001 


1002 


1003 


1004 


1005 


1006 


1007 


3F0 


1008 


1009 


1010 


1011 


1012 


1013 


1014 


1015 


1016 


1C17 


1018 


1019 


1020 


1021 


1022 


1023 
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1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


400 


1024 


1025 


1026 


1027 


1028 


1029 


1030 


1031 


1032 


1033 


1034 


1035 


1036 


1037 


1038 


1039 


410 


1040 


1041 


1042 


1043 


1044 


1045 


1046 


1047 


1048 


1049 


1050 


1051 


1052 


1053 


1054 


1055 


420 


1056 


1057 


1058 


1059 


1060 


1061 


1062 


1063 


1064 


1065 


1066 


1067 


1068 


1069 


1070 


1071 


430 


1072 


1073 


1074 


1075 


1076 


1077 


1078 


1079 


1080 


1081 


1082 


1083 


1084 


1085 


1086 


1087 


440 


1088 


1089 


1090 


1091 


1092 


1093 


1094 


1095 


1096 


1097 


1098 


1099 


1100 


1101 


1102 


1103 


450 


1104 


1105 


1106 


1107 


1108 


1109 


1110 


1111 


1112 


1113 


1114 


1115 


1116 


1117 


1118 


1119 


460 


1120 


1121 


1122 


1123 


1124 


1125 


1126 


1127 


1128 


1129 


1130 


1131 


1132 


1133 


1134 


1135 


470 


1136 


1137 


1138 


1139 


1140 


1141 


1142 


1143 


1144 


1145 


1146 


1147 


1148 


1149 


1150 


1151 


480 


1152 


1153 


1154 


1155 


1156 


1157 


1158 


1159 


1160 


1161 


1162 


1163 


1164 


1165 


1166 


1167 


490 


1168 


1169 


1170 


1171 


1172 


1173 


1174 


1175 


1176 


1177 


1178 


1179 


1180 


1181 


1182 


1183 


4A0 


1184 


1185 


1186 


1187 


1188 


1189 


1190 


1191 


1192 


1193 


1194 


1195 


1196 


1197 


1198 


1199 


4B0 


1200 


1201 


1202 


1203 


1204 


1205 


1206 


1207 


1208 


1209 


1210 


1211 


1212 


1213 


1214 


1215 


4C0 


1216 


1217 


1218 


1219 


1220 


1221 


1222 


1223 


1224 


1225 


1226 


1227 


1228 


1229 


1230 


1231 


4D0 


1232 


1233 


1234 


1235 


1236 


1237 


1238 


1239 


1240 


1241 


1242 


1243 


1244 


1245 


1246 


1247 


4E0 


1248 


1249 


1250 


1251 


1252 


1253 


1254 


1255 


1256 


1257 


1258 


1259 


1260 


1261 


1262 


1263 


4F0 
500 


1264 


1265 


1266 


1267 


1268 


1269 


1270 


1271 


1272 


1273 


1274 


1275 


1276 


1277 


1278 


1279 


1280 


1281 


1282 


1283 


1284 


1285 


1286 


1287 


1288 


1289 


1290 


1291 


1292 


1293 


1294 


1295 


510 


1296 


1297 


1298 


1299 


1300 


1301 


1302 


1303 


1304 


1305 


1306 


1307 


1308 


1309 


1310 


1311 


520 


1312 


1313 


1314 


1315 


1316 


1317 


1318 


1319 


1320 


1321 


1322 


1323 


1324 


1325 


1326 


1327 


530 


1328 


1329 


1330 


1331 


1332 


1333 


1334 


1335 


1336 


1337 


1338 


1339 


1340 


1341 


1342 


1343 


540 


1344 


1345 


1346 


1347 


1348 


1349 


1350 


1351 


1352 


1353 


1354 


1355 


1356 


1357 


1358 


1359 


550 


1360 


1361 


1362 


1363 


1364 


1365 


1366 


1367 


1368 


1369 


1370 


1371 


1372 


1373 


1374 


1375 


560 


1376 


1377 


1378 


1379 


1380 


1381 


1382 


1383 


1384 


1385 


1386 


1387 


1388 


1389 


1390 


1391 


570 


1392 


1393 


1394 


1395 


1396 


1397 


1398 


1399 


1400 


1401 


1402 


1403 


1404 


1405 


1406 


1407 


580 


1408 


1409 


1410 


1411 


1412 


1413 


1414 


1415 


1416 


1417 


1418 


1419 


1420 


1421 


1422 


1423 


590 


1424 


1425 


1426 


1427 


1428 


1429 


1430 


1431 


1432 


1433 


1434 


1435 


1436 


1437 


1438 


1439 


SAO 


1440 


1441 


1442 


1443 


1444 


1445 


1446 


1447 


1448 


1449 


1450 


1451 


1452 


1453 


1454 


1455 


5B0 


1456 


1457 


1458 


1459 


1460 


1461 


1462 


1463 


1464 


1465 


1466 


1467 


1468 


1469 


1470 


1471 


5C0 


1472 


1473 


1474 


1475 


1476 


1477 


1478 


1479 


1480 


1481 


1482 


1483 


1484 


1485 


1486 


1487 


5 DO 


1488 


1489 


1490 


1491 


1492 


1493 


1494 


1495 


1496 


1497 


1498 


1499 


1500 


1501 


1502 


1503 


5E0 


1504 


1505 


1506 


1507 


1508 


1509 


1510 


1511 


1512 


1513 


1514 


1515 


1516 


1517 


1518 


1519 


5F0 
600 


1520 


1521 


1522 


1523 


1524 


1525 


1526 


1527 


1528 


1529 


1530 


1531 


1532 


1533 


1534 


1535 


1536 


1537 


1538 


1539 


1540 


1541 


1542 


1543 


1544 


1545 


1546 


1547 


1548 


1549 


1550 


1551 


610 


1552 


1553 


1554 


1555 


1556 


1557 


1558 


1559 


1560 


1561 


1562 


1563 


1564 


1565 


1566 


1567 


620 


1568 


1569 


1570 


1571 


1572 


1573 


1574 


1575 


1576 


1577 


1578 


1579 


1580 


1581 


1582 


1583 


630 


1584 


1585 


1586 


1587 


1588 


1589 


1590 


1591 


1592 


1593 


1594 


1595 


1596 


1597 


1598 


1599 


640 


1600 


1601 


1602 


1603 


1604 


1605 


1606 


1607 


1608 


1609 


1610 


1611 


1612 


1613 


1614 


1615 


650 


1616 


1617 


1618 


1619 


1620 


1621 


1622 


1623 


1624 


1625 


1626 


1627 


1628 


1629 


1630 


1631 


660 


1632 


1633 


1634 


1635 


1636 


1637 


1638 


1639 


1640 


1641 


1642 


1643 


1644 


1645 


1646 


1647 


670 


1648 


1649 


1650 


1651 


1652 


1653 


1654 


1655 


1656 


1657 


1658 


1659 


1660 


1661 


1662 


1663 


680 


1664 


1665 


1666 


1667 


1668 


1669 


1670 


1671 


1672 


1673 


1674 


1675 


1676 


1677 


1678 


1679 


690 


1680 


1681 


1682 


1683 


1684 


1685 


1686 


1687 


1688 


1689 


1690 


1691 


1692 


1693 


1694 


1695 


6A0 


1696 


1697 


1698 


1699 


1700 


1701 


1702 


1703 


1704 


1705 


1706 


1707 


1708 


1709 


1710 


1711 


6 BO 


1712 


1713 


1714 


1715 


1716 


1717 


1718 


1719 


1720 


1721 


1722 


1723 


1724 


1725 


1726 


1727 


6C0 


1728 


1729 


1730 


1731 


1732 


1733 


1734 


1735 


1736 


1737 


1738 


1739 


1740 


1741 


1742 


1743 


6 DO 


1744 


1745 


1746 


1747 


1748 


1749 


1750 


1751 


1752 


1753 


1754 


1755 


1756 


1757 


1758 


1759 


6E0 


1760 


1761 


1762 


1763 


1764 


1765 


1766 


1767 


1768 


1769 


1770 


1771 


1772 


1773 


1774 


1775 


6F0 
700 


1776 


1777 


1778 


1779 


1780 


1781 


1782 


1783 


1784 


1785 


1786 


1787 


1788 


1789 


1790 


1791 


1792 


1793 


1794 


1795 


1796 


1797 


1798 


1799 


1800 


1801 


1802 


1803 


1804 


1805 


1806 


1807 


710 


1808 


1809 


1810 


1811 


1812 


1813 


1814 


1815 


1816 


1817 


1818 


1819 


1820 


1821 


1822 


1823 


720 


1824 


1825 


1826 


1827 


1828 


1829 


1830 


1831 


1832 


1833 


1834 


1835 


1836 


1837 


1838 


1839 


730 


1840 


1841 


1842 


1843 


1844 


1845 


1846 


1847 


1848 


1849 


1850 


1851 


1852 


1853 


1854 


1855 


740 


1856 


1857 


1858 


1859 


1860 


1861 


1862 


1863 


1864 


1865 


1866 


1867 


1868 


1869 


1870 


1871 


750 


1872 


1873 


1874 


1875 


1876 


1877 


1878 


1879 


1880 


1881 


1882 


1883 


1884 


1885 


1886 


1887 


760 


1888 


1889 


1890 


1891 


1892 


1893 


1894 


1895 


1896 


1897 


1898 


1899 


1900 


1901 


1902 


1903 


770 


1904 


1905 


1906 


1907 


1908 


1909 


1910 


1911 


1912 


1913 


1914 


1915 


1916 


1917 


1918 


1919 


780 


1920 


1921 


1922 


1923 


1924 


1925 


1926 


1927 


1928 


1929 


1930 


1931 


1932 


1933 


1934 


1935 


790 


1936 


1937 


1938 


1939 


1940 


1941 


1942 


1943 


1944 


1945 


1946 


1947 


1948 


1949 


1950 


1951 


7A0 


1952 


1953 


1954 


1955 


1956 


1957 


1958 


1959 


1960 


1961 


1962 


1963 


1964 


1965 


1966 


1967 


7B0 


1968 


1969 


1970 


1971 


1972 


1973 


1974 


1975 


1976 


1977 


1978 


1979 


1980 


1981 


1982 


1983 


7C0 


1984 


1985 


1986 


1987 


1988 


1989 


1990 


1991 


1992 


1993 


1994 


1995 


1996 


1997 


1998 


1999 


7D0 


2000 


2001 


2002 


2003 


2004 


2005 


2006 


2007 


2008 


2009 


2010 


2011 


2012 


2013 


2014 


2015 


7E0 


2016 


2017 


2018 


2019 


2020 


2021 


2022 


2023 


2024 


2025 


2026 


2027 


2028 


2029 


2030 


2031 


7F0 


2032 


2033 


2034 


2035 


2036 


2037 


2038 


2039 


2040 


2041 


2042 


2043 


2044 


2045 


2046 


2047 



- 125 



LA PRATIQUE DU TRS-80 








1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


800 


2048 


2049 


2050 


2051 


2052 


2053 


2054 


2055 


2056 


2057 


2058 


2059 


2060 


2061 


2062 


2063 


810 


2064 


2065 


2066 


2067 


2068 


2069 


2070 


2071 


2072 


2073 


2074 


2075 


2076 


2077 


2078 


2079 


820 


2080 


2081 


2082 


2083 


2084 


2085 


2086 


2087 


2088 


2089 


2090 


2091 


2092 


2093 


2094 


2095 


830 


2096 


2097 


2098 


2099 


2100 


2101 


2102 


2103 


2104 


2105 


2106 


2107 


2108 


2109 


2110 


2111 


840 


2112 


2113 


2114 


2115 


2116 


2117 


2118 


2119 


2120 


2121 


2122 


2123 


2124 


2125 


2126 


2127 


850 


2128 


2129 


2130 


2131 


2132 


2133 


2134 


2135 


2136 


2137 


2138 


2139 


2140 


2141 


2142 


2143 


860 


2144 


2145 


2146 


2147 


2148 


2149 


2150 


2151 


2152 


2153 


2154 


2155 


2156 


2157 


2158 


2159 


870 


2160 


2161 


2162 


2163 


2164 


2165 


2166 


2167 


2168 


2169 


2170 


2171 


2172 


2173 


2174 


2175 


880 


2176 


2177 


2178 


2179 


2180 


2181 


2182 


2183 


2184 


2185 


2186 


2187 


2188 


2189 


2190 


2191 


890 


2192 


2193 


2194 


2195 


2196 


2197 


2198 


2199 


2200 


2201 


2202 


2203 


2204 


2205 


2206 


2207 


8A0 


2208 


2209 


2210 


2211 


2212 


2213 


2214 


2215 


2216 


2217 


2218 


2219 


2220 


2221 


2222 


2223 


8B0 


2224 


2225 


2226 


2227 


2228 


2229 


2230 


2231 


2232 


2233 


2234 


2235 


2236 


2237 


2238 


2239 


8C0 


2240 


2241 


2242 


2243 


2244 


2245 


2246 


2247 


2248 


2249 


2250 


2251 


2252 


2253 


2254 


2255 


8D0 


2256 


2257 


2258 


2259 


2260 


2261 


2262 


2263 


2264 


2265 


2266 


2267 


2268 


2269 


2270 


2271 


8E0 


2272 


2273 


2274 


2275 


2276 


2277 


2278 


2279 


2280 


2281 


2282 


2283 


2284 


2285 


2286 


2287 


8F0 
900 


2288 


2289 


2290 


2291 


2292 


2293 


2294 


2295 


2296 


2297 


2298 


2299 


2300 


2301 


2302 


2303 


2304 


2305 


2306 


2307 


2308 


2309 


2310 


2311 


2312 


2313 


2314 


2315 


2316 


2317 


2318 


2319 


910 


2320 


2321 


2322 


2323 


2324 


2325 


2326 


2327 


2328 


2329 


2330 


2331 


2332 


2333 


2334 


2335 


920 


2336 


2337 


2338 


2339 


2340 


2341 


2342 


2343 


2344 


2345 


2346 


2347 


2348 


2349 


2350 


2351 


930 


2352 


2353 


2354 


2355 


2356 


2357 


2358 


2359 


2360 


2361 


2362 


2363 


2364 


2365 


2366 


2367 


940 


2368 


2369 


2370 


2371 


2372 


2373 


2374 


2375 


2376 


2377 


2378 


2379 


2380 


2381 


2382 


2383 


950 


2384 


2385 


2386 


2387 


2388 


2389 


2390 


2391 


2392 


2393 


2394 


2395 


2396 


2397 


2398 


2399 


960 


2400 


2401 


2402 


2403 


2404 


2405 


2406 


2407 


2408 


2409 


2410 


2411 


2412 


2413 


2414 


2415 


970 


2416 


2417 


2418 


2419 


2420 


2421 


2422 


2423 


2424 


2425 


2426 


2427 


2428 


2429 


2430 


2431 


980 


2432 


2433 


2434 


2435 


2436 


2437 


2438 


2439 


2440 


2441 


2442 


2443 


2444 


2445 


2446 


2447 


990 


2448 


2449 


2450 


2451 


2452 


2453 


2454 


2455 


2456 


2457 


2458 


2459 


2460 


2461 


2462 


2463 


9A0 


2464 


2465 


2466 


2467 


2468 


2469 


2470 


2471 


2472 


2473 


2474 


2475 


2476 


2477 


2478 


2479 


9B0 


2480 


2481 


2482 


2483 


2484 


2485 


2486 


2487 


2488 


2489 


2490 


2491 


2492 


2493 


2494 


2495 


9C0 


2496 


2497 


2498 


2499 


2500 


2501 


2502 


2503 


2504 


2505 


2506 


2507 


2508 


2509 


2510 


2511 


9D0 


2512 


2513 


2514 


2515 


2516 


2517 


2518 


2519 


2520 


2521 


2522 


2523 


2524 


2525 


2526 


2527 


9E0 


2528 


2529 


2530 


2531 


2532 


2533 


2534 


2535 


2536 


2537 


2538 


2539 


2540 


2541 


2542 


2543 


9F0 
AO0 


2544 


2545 


2546 


2547 


2548 


2549 


2550 


2551 


2552 


2553 


2554 


2555 


2556 


2557 


2558 


2559 


2560 


2561 


2562 


2563 


2564 


2565 


2566 


2567 


2568 


2569 


2570 


2571 


2572 


2573 


2574 


2575 


A10 


2576 


2577 


2578 


2579 


2580 


2581 


2582 


2583 


2584 


2585 


2586 


2587 


2588 


2589 


2590 


2591 


A20 


2592 


2593 


2594 


2595 


2596 


2597 


2598 


2599 


2600 


2601 


2602 


2603 


2604 


2605 


2606 


2607 


A30 


2608 


2609 


2610 


2611 


2612 


2613 


2614 


2615 


2616 


2617 


2618 


2619 


2620 


2621 


2622 


2623 


A40 


2624 


2625 


2626 


2627 


2628 


2629 


2630 


2631 


2632 


2633 


2634 


2635 


2636 


2637 


2638 


2639 


A50 


2640 


2641 


2642 


2643 


2644 


2645 


2646 


2647 


2648 


2649 


2650 


2651 


2652 


2653 


2654 


2655 


A60 


2656 


2657 


2658 


2659 


2660 


2661 


2662 


2663 


2664 


2665 


2666 


2667 


2668 


2669 


2670 


2671 


A70 


2672 


2673 


2674 


2675 


2676 


2677 


2678 


2679 


2680 


2681 


2682 


2683 


2684 


2685 


2686 


2687 


A80 


2688 


2689 


2690 


2691 


2692 


2693 


2694 


2695 


2696 


2697 


2698 


2699 


2700 


2701 


2702 


2703 


A90 


2704 


2705 


2706 


2707 


2708 


2709 


2710 


2711 


2712 


2713 


2714 


2715 


2716 


2717 


2718 


2719 


AAO 


2720 


2721 


2722 


2723 


2724 


2725 


2726 


2727 


2728 


2729 


2730 


2731 


2732 


2733 


2734 


2735 


ABO 


2736 


2737 


2738 


2739 


2740 


2741 


2742 


2743 


2744 


2745 


2746 


2747 


2748 


2749 


2750 


2751 


ACO 


2752 


2753 


2754 


2755 


2756 


2757 


2758 


2759 


2760 


2761 


2762 


2763 


2764 


2765 


2766 


2767 


ADO 


2768 


2769 


2770 


2771 


2772 


2773 


2774 


2775 


2776 


2777 


2778 


2779 


2780 


2781 


2782 


2783 


AEO 


2784 


2785 


2786 


2787 


2788 


2789 


2790 


2791 


2792 


2793 


2794 


2795 


2796 


2797 


2798 


2799 


AFO 
BOO 


2800 


2801 


2802 


2803 


2804 


2805 


2806 


2807 


2808 


2809 


2810 


2811 


2812 


2813 


2814 


2815 


2816 


2817 


2818 


2819 


2820 


2821 


2822 


2323 


2824 


2825 


2826 


2827 


2828 


2829 


2830 


2831 


BIO 


2832 


2833 


2834 


2835 


2836 


2837 


2838 


2839 


2840 


2841 


2842 


2843 


2844 


2845 


2846 


2847 


B20 


2848 


2849 


2850 


2851 


2852 


2853 


2854 


2855 


2856 


2857 


2858 


2859 


2860 


2861 


2862 


2863 


B30 


2864 


2865 


2866 


2867 


2868 


2869 


2870 


2871 


2872 


2873 


2874 


2875 


2876 


2877 


2878 


2879 


B40 


2880 


2881 


2882 


2883 


2884 


2885 


2886 


2887 


2888 


2889 


2890 


2891 


2892 


2893 


2894 


2895 


B50 


2896 


2897 


2898 


2899 


2900 


2901 


2902 


2903 


2904 


2905 


2906 


2907 


2908 


2909 


2910 


2911 


B60 


2912 


2913 


2914 


2915 


2916 


2917 


2918 


2919 


2920 


2921 


2922 


2923 


2924 


2925 


2926 


2927 


B70 


2928 


2929 


2930 


2931 


2932 


2933 


2934 


2935 


2936 


2937 


2938 


2939 


2940 


2941 


2942 


2943 


B80 


2944 


2945 


2946 


2947 


2948 


2949 


2950 


2951 


2952 


2953 


2954 


2955 


2956 


2957 


2958 


2959 


B90 


2960 


2961 


2962 


2963 


2964 


2965 


2966 


2967 


2968 


2969 


2970 


2971 


2972 


2973 


2974 


2975 


BAO 


2976 


2977 


2978 


2979 


2980 


2981 


2982 


2983 


2984 


2985 


2986 


2987 


2988 


2989 


2990 


2991 


BBO 


2992 


2993 


2994 


2995 


2996 


2997 


2998 


2999 


3000 


3001 


3002 


3003 


3004 


3005 


3006 


3007 


BCO 


3008 


3009 


3010 


3011 


3012 


3013 


3014 


3015 


3016 


3017 


3018 


3019 


3020 


3021 


3022 


3023 


BDO 


3024 


3025 


3026 


3027 


3028* 


3029 


3030 


3031 


3032 


3033 


3034 


3035 


3036 


3037 


3038 


3039 


BEO 


3040 


3041 


3042 


3043 


3044 


3045 


3046 


3047 


3048 


3049 


3050 


3051 


3052 


30S3 


3054 


3055 


BFO 


3056 


3057 


3058 


3059 


3060 


3061 


3062 


3063 


3064 


3065 


3066 


3067 


3068 


3069 


3070 


3071 



- 126 - 



LA PRATIQUE DU TRS-80 








1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 


D 


E 


F 


coo 


3072 


3073 


3074 


3075 


3076 


3077 


3078 


3079 


3080 


3081 


3082 


3083 


3084 


3085 


3086 


3087 


CIO 


3088 


3089 


3090 


3091 


3092 


3093 


3094 


3095 


3096 


3097 


3098 


3099 


3100 


3101 


3102 


3103 


C20 


3104 


3105 


3106 


3107 


3108 


3109 


3110 


3111 


3112 


3113 


3114 


3115 


3116 


3117 


3118 


3119 


C30 


3120 


3121 


3122 


3123 


3124 


3125 


3126 


3127 


3128 


3129 


3130 


3131 


3132 


3133 


3134 


3135 


C40 


3136 


3137 


3138 


3139 


3140 


3141 


3142 


3143 


3144 


3145 


3146 


3147 


3148 


3149 


3150 


3151 


C50 


3152 


3153 


3154 


3155 


3156 


3157 


3158 


3159 


3160 


3161 


3162 


3163 


3164 


3165 


3166 


3167 


C60 


3168 


3169 


3170 


3171 


3172 


3173 


3174 


3175 


3176 


3177 


3178 


3179 


3180 


3181 


3182 


3183 


C70 


3184 


3185 


3186 


3187 


3188 


3189 


3190 


3191 


3192 


3193 


3194 


3195 


3196 


3197 


3198 


3199 


C80 


3200 


3201 


3202 


3203 


3204 


3205 


3206 


3207 


3208 


3209 


3210 


3211 


3212 


3213 


3214 


3215 


C90 


3216 


3217 


3218 


3219 


3220 


3221 


3222 


3223 


3224 


3225 


3226 


3227 


3228 


3229 


3230 


3231 


CAO 


3232 


3233 


3234 


3235 


3236 


3237 


3238 


3239 


3240 


3241 


3242 


3243 


3244 


3245 


3246 


3247 


CBO 


3248 


3249 


3250 


3251 


3252 


3253 


3254 


3255 


3256 


3257 


3258 


3259 


3260 


3261 


3262 


3263 


CCO 


3264 


3265 


3266 


3267 


3268 


3269 


3270 


3271 


3272 


3273 


3274 


3275 


3276 


3277 


3278 


3279 


CDO 


3280 


3281 


3282 


3283 


3284 


3285 


3286 


3287 


3288 


3289 


3290 


3291 


3292 


3293 


3294 


3295 


CEO 


3296 


3297 


3298 


3299 


3300 


3301 


3302 


3303 


3304 


3305 


3306 


3307 


3308 


3309 


3310 


3311 


CFO 
DOO 


3312 


3313 


3314 


3315 


3316 


3317 


3318 


3319 


3320 


3321 


3322 


3323 


3324 


3325 


3326 


3327 


3328 


3329 


3330 


3331 


3332 


3333 


3334 


3335 


3336 


3337 


3338 


3339 


3340 


3341 


3342 


3343 


DIO 


3344 


3345 


3346 


3347 


3348 


3349 


3350 


3351 


3352 


3353 


3354 


3355 


3356 


3357 


3358 


3359 


D20 


3360 


3361 


3362 


3363 


3364 


3365 


3366 


3367 


3368 


3369 


3370 


3371 


3372 


3373 


3374 


3375 


D30 


3376 


3377 


3378 


3379 


3380 


3381 


3382 


3383 


3384 


3385 


3386 


3387 


3388 


3389 


3390 


3391 


D40 


3392 


3393 


3394 


3395 


3396 


3397 


3398 


3399 


3400 


3401 


3402 


3403 


3404 


3405 


3406 


3407 


D50 


3408 


3409 


3410 


3411 


3412 


3413 


3414 


3415 


3416 


3417 


3418 


3419 


3420 


3421 


3422 


3423 


D60 


3424 


3425 


3426 


3427 


3428 


3429 


3430 


3431 


3432 


3433 


3434 


3435 


3436 


3437 


3438 


3439 


D70 


3440 


3441 


3442 


3443 


3444 


3445 


3446 


3447 


3448 


3449 


3450 


3451 


3452 


3453 


3454 


3455 


D80 


3456 


3457 


3458 


3459 


3460 


3461 


3462 


3463 


3464 


3465 


3466 


3467 


3468 


3469 


3470 


3471 


D90 


3472 


3473 


3474 


3475 


3476 


3477 


3478 


3479 


3480 


3481 


3482 


3483 


3484 


3485 


3486 


3487 


DAO 


3488 


3489 


3490 


3491 


3492 


3493 


3494 


3495 


3496 


3497 


3498 


3499 


3500 


3501 


3502 


3503 


DBO 


3504 


3505 


3506 


3507 


3508 


3509 


3510 


3511 


3512 


3513 


3514 


3515 


3516 


3517 


3518 


3519 


DCO 


3520 


3521 


3522 


3523 


3524 


3525 


3526 


3527 


3528 


3529 


3530 


3531 


3532 


3533 


3534 


3535 


DDO 


3536 


3537 


3538 


3539 


3540 


3541 


3542 


3543 


3544 


3545 


3546 


3547 


3548 


3549 


3550 


3551 


DEO 


3552 


3553 


3554 


3555 


3556 


3557 


3558 


3559 


3560 


3561 


3562 


3563 


3564 


3565 


3566 


3567 


DFO 
EOO 


3568 


3569 


3570 


3571 


3572 


3573 


3574 


3575 


3576 


3577 


3578 


3579 


3580 


3581 


3582 


3583 


3584 


3585 


3586 


3587 


3588 


3589 


3590 


3591 


3592 


3593 


3594 


3595 


3596 


3597 


3598 


3599 


ElO 


3600 


3601 


3602 


3603 


3604 


3605 


3606 


3607 


3608 


3609 


3610 


3611 


3612 


3613 


3614 


3615 


E20 


3616 


3617 


3618 


3619 


3620 


3621 


3622 


3623 


3624 


3625 


3626 


3627 


3628 


3629 


3630 


3631 


E30 


3632 


3633 


3634 


3635 


3636 


3637 


3638 


3639 


3640 


3641 


3642 


3643 


3644 


3645 


3646 


3647 


E40 


3648 


3649 


3650 


3651 


3652 


3653 


3654 


3655 


3656 


3657 


3658 


3659 


3660 


3661 


3662 


3663 


E50 


3664 


3665 


3666 


3667 


3668 


3669 


3670 


3671 


3672 


3673 


3674 


3675 


3676 


3677 


3678 


3679 


E60 


3680 


3681 


3682 


3683 


3684 


3685 


3686 


3687 


3688 


3689 


3690 


3691 


3692 


3693 


3694 


3695 


E70 


3696 


3697 


3698 


3699 


3700 


3701 


3702 


3703 


3704 


3705 


3706 


3707 


3708 


3709 


3710 


3711 


E80 


3712 


3713 


3714 


3715 


3716 


3717 


3718 


3719 


3720 


3721 


3722 


3723 


3724 


3725 


3726 


3727 


E90 


3728 


3729 


3730 


3731 


3732 


3733 


3734 


3735 


3736 


3737 


3738 


3739 


3740 


3741 


3742 


3743 


EAO 


3744 


3745 


3746 


3747 


3748 


3749 


3750 


3751 


3752 


3753 


3754 


3755 


3756 


3757 


3758 


3759 


EBO 


3760 


3761 


3762 


3763 


3764 


3765 


3766 


3767 


3768 


3769 


3770 


3771 


3772 


3773 


3774 


3775 


ECO 


3776 


3777 


3778 


3779 


3780 


3781 


3782 


3783 


3784 


3785 


3786 


3787 


3788 


3789 


3790 


3791 


EDO 


3792 


3793 


3794 


3795 


3796 


3797 


3798 


3799 


3800 


3801 


3802 


3803 


3804 


3805 


3806 


3807 


EEO 


3808 


3809 


3810 


3811 


3812 


3813 


3814 


3815 


3816 


3817 


3818 


3819 


3820 


3821 


3822 


3823 


EFO 
FOO 


3824 


3825 


3826 


3827 


3828 


3829 


3830 


3831 


3832 


3833 


3834 


3835 


3836 


3837 


3838 


3839 


3840 


3841 


3842 


3843 


3844 


3845 


3846 


3847 


3848 


3849 


3850 


3851 


3852 


3853 


3854 


3855 


FIO 


3856 


3857 


3858 


3859 


3860 


3861 


3862 


3863 


3864 


3865 


3866 


3867 


3868 


3869 


3870 


3871 


F20 


3872 


3873 


3874 


3875 


3876 


3877 


3878 


3879 


3880 


3881 


3882 


3883 


3884 


3885 


3886 


3887 


F30 


3888 


3889 


3890 


3891 


3892 


3893 


3894 


3895 


3896 


3897 


3898 


3899 


3900 


3901 


3902 


3903 


F40 


3904 


3905 


3906 


3907 


3908 


3909 


3910 


3911 


3912 


3913 


3914 


3915 


3916 


3917 


3918 


3919 


F50 


3920 


3921 


3922 


3923 


3924 


3925 


3926 


3927 


3928 


3929 


3930 


3931 


3932 


3933 


3934 


3935 


F60 


3936 


3937 


3938 


3939 


3940 


3941 


3942 


3943 


3944 


3945 


3946 


3947 


3948 


3949 


3950 


3951 


F70 


3952 


3953 


3954 


3955 


3956 


3957 


3958 


3959 


3960 


3961 


3962 


3963 


3964 


3965 


3966 


3967 


F80 


3968 


3969 


3970 


3971 


3972 


3973 


3974 


3975 


3976 


3977 


3978 


3979 


3980 


3981 


3982 


3983 


F90 


3984 


3985 


3986 


3987 


3988 


3989 


3990 


3991 


3992 


3993 


3994 


3995 


3996 


3997 


3998 


3999 


FAO 


4000 


4001 


4002 


4003 


4004 


4005 


4006 


4007 


4008 


4009 


4010 


4011 


4012 


4013 


4014 


4015 


FBO 


4016 


4017 


4018 


4019 


4020 


4021 


4022 


4023 


4024 


4025 


4026 


4027 


4028 


4029 


4030 


4031 


FCO 


4032 


4033 


4034 


4035 


4036 


4037 


4038 


4039 


4040 


4041 


4042 


4043 


4044 


4045 


4046 


4047 


FDO 


4048 


4049 


4050 


4051 


4052 


4053 


4054 


4055 


4056 


4057 


4058 


4059 


4060 


4061 


4062 


4063 


FEO 


4064 


4065 


4066 


4067 


4068 


4069 


4070 


4071 


4072 


4073 


4074 


4075 


4076 


4077 


4078 


4079 


FFO 


4080 


4081 


4082 


4083 


4084 


4085 


4086 


4087 


4088 


4089 


4090 


4091 


4092 


4093 


4094 


4095 



- 127 - 



Acheve d'imprimer 

sur les presses de 

Impressions Cepi 

1 74, Quai de Jemmapes 

75010 PARIS 

Depot legal N ° 58 - 3e trimestre 1979 



N° d 'edition : 86470-5-1 
ISBN : 2-86470-005-0 



( 



La pratique du 

TRS80 

Volume I - Architecture et Basic II 



Cet ouvrage de la serie perfectionnement s'adresse aux 
amateurs de TRS-80 ayant deja quelques connaissances 
en informatique et des notions de BASIC. I! a pour 
objectif de permettre au possesseur ou utilisateur de 
TRS-80 de tirer le meilleur parti de son ordinateur — et — 
en particulier du langage BASIC niveau II. II comprend 
des exemples de programmes et des annexes pratiques. 




Editions du P.S.I. 

B.P. 86 
77400 Lagny/Marne 



ISBN : 2-86470-005-0 



Imprime' en Fiance 



